IBM VSE/Advanced Functions 


Handbook 


Program Number 5666-301 


Order Number LY33-9121-0 
File No. $370/4300-40 


Licensed Material - Property of IBM © Copyright IBM Corp. 1¢ 


First Edition (July 1985) 


This edition applies to Version 2 Release 1 of IBM Virtual 
Storage Extended/Advanced Functions, Program Number 5666-301, 
and to all subsequent versions and releases until otherwise 
indicated in new editions or Technical Newsletters. Changes are 
continually made to the information herein; before using this 
publication in connection with the operation of IBM systems, 
consult the latest IBM System /370 and 4300 Processor 
Bibliography, GC20-0001, for the editions that are applicable 
and current. 


References in this publication to IBM products, programs, or 
services do not imply that IBM intends to make these available 
in all countries in in which IBM operates. Any reference to an 
IBM program product in this document is not intended to state or 
imply that only IBM's program products may be used. Any 
functionally equivalent program may be used instead. 


Publications are not stocked at the address given below; 
requests for copies of IBM publications should be made to your 
IBM representative or to the IBM branch office serving your 
locality. 


A form for reader's comment is provided at the back of this 
publication. If the form has been removed, comments may be 
addressed either to: 


IBM Corporation 

Dept. 6R1B 

180 Kost Road 

Mechanicsburg, PA 17055, USA 


or to: 


WT-DP/CE Technical Operations 

Dept. 7944 

Pascalstr. 100 

D-7000 Stuttgart 80, Federal Republic of Germany 


IBM may use or distribute any of the information you supply in 
any way it believes appropriate without incurring any obligation 
whatever. You may, of course, continue to use the information 
you supply. 


© Copyright International Business Machines Corporation 1985 


Licensed Material - Property of IBM 


PREFACE 


© Copyright IBM Corp. 1985 


This is a major revision of and obsoletes LY33-9101-1. The manual is provided as 
a VSE/Advanced Function, Version 2 Release 1, serviceability aid and is a 
summary of other VSE/Advanced Functions Version 2 Release 1 documentation. 


Note: For reasons of brevity, the product name "VSE/Advanced Functions" is 
referred to in this publication as VSE/AF. 


The volume contains the 


Chapter 


Appendix 


1: VSE/SP 
2: VSE/AF 
35 
4 
5 


VSE/AF 


: VSE/AF 
: VSE/AF 


following information: 


General Information 

General Information 

I0CS (General) 

Supervisor Control Blocks and Areas 
Service Aids 


If there is any discrepancy between the information in this manual and the 
Diagnosis Reference Manuals for the product, the latter is assumed to be 


correct. 


Separate handbooks are available for related program products as follows: 


VSE/Power handbook: LY33-9094-3 
VSE/ICCF handbook: 


LY33~-9122-0 


A handbook sized binder, FE Part Number 453 559, may be purchased from IBM. 


Customers may order it by their IBM marketing representative. 


should order it as an FE part from Mechanicsburg. 


IBM personnel 


Preface 
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GENERAL OBJECTIVES 


Package Description 


The VSE System IPO/E was used to deliver VSE systems as a package. VSE/SP will 
be used to deliver VSE Advanced Functions 2.1.x and associated products. It is 
the successor to VSE System IPO/E 1.4.x and previous VSE/System IPO/E packages. 
The VSE/SP package is provided to simplify the Installation, Use and Servicing 
of these products. 


VSE System IPO/E 1.3.1 


VSE System IPO/E 1.3.1 was delivered as sets of production and service 
libraries. All Relocatable and Source code delivered in the products was 
contained in the service libraries while only the subset of that code which was 
needed by the customer for day to day use was in the production libraries. 
Service application was accomplished by applying service to the service 
libraries and then recréating the production libraries from the updated code. 


VSE System IPO/E 1.4.x 


VSE System IPO/E 1.4.x is delivered as either a Production system or a 
Generation system. The Generation system is similar to VSE System IPO/E 1.3.1 in 
both installation and service. 


The Production system is also similar to VSE System IPO/E 1.3.1 except that 
there are no service libraries. Service which involves relocatable and source 
code not normally required by the customer for day to day use is assembled and 
link edited by IBM. Service is then delivered to the customer for direct 
application to his Production libraries. 


VSE/SP 2.1.x 


VSE/SP 2.1.x is delivered only as a Production system. There is an optional 
Generation feature which contains source code for VSE Advanced Functions 
Supervisor and CICS control programs only. All service is delivered in the form 
normally required by the customer for day to day use. Service which affects code 
in the Generation feature will be delivered as two PTFs a Production and a. 
Generation Feature PTF. The Generation Feature PTF will only be applied by NSHP 
if the feature has previously been installed. 


Service Process Overview 


The service process is activated when a user of IBM code encounters a problem. 
The user contacts the IBM Support Center with a description and the symptoms of 
the problem. The Support Center representatives will use this information to 
perform a search of the data bases containing descriptions and symptoms of known 
problems. 


Known Problems 


When a match is found in one of the data bases, the problem is discussed with 
the user to determine if it is the same problem. When a Support Center 
Representative and the user agree that this is the same problem and a fix is 
available, the fix will be made available to the user. Thé fix may be in the 
form of a PTF or as an update to an existing Phase, Module, or Macro in the 
user's system. 


When the problem is known but a fix is not available, the customer may request 
to be added as an interested party to the existing APAR. When a fix is available 
for the APAR, all interested parties will be notified that the fix is available 
and it will be delivered to them, upon request, in the correct form for their 
environment. 
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New Problems 


When no match is found in any of the data bases at the Support Center, an APAR 
(Authorized Program Analysis Report) is created and sent to the Change Team 
responsible for the affected component. The Change Team will analyze and correct 
the error as appropriate and develop a fix. The fix will be available to the 
user who encountered the problem and to other interested parties, if requested. 
The problem description and symptoms will then be available in the Support 
Center data bases to assist other users who encounter the problem. 


Note: When a severe problem is encountered for which there is no fix available 
the Support Center Representative will develop a bypass or circumvention, if 
requested by the customer. 


Service Delivery 


Service to resolve a given problem must be tailored by IBM to correspond to each 
of the environments in which the error exists. For example, 4 PTFs may be 
required to resolve 1 APAR in CICS 1.6.0., since this product is delivered as 
part of 3 VSE packages and also as a separately installable product. The format 
and content of service for each of these environments is different and requires 
that separate PTFs be provided for each. THE ENVIRONMENT 1S DEFINED IN 
THE SYSTEM HISTORY FILE AND CAN BE OBTAINED BY USING THE MSHP 
FUNCTION RETRACE PRODUCT. FHE SUPPORT CENTER REPRESENTATIVE 
AND THE USER SHOULD CAREFULLY DEFINE THE ENVIRONMENT IN WHICH 
THE ERROR OCCURRED IN ORDER TO ENSURE THAT THE CORRECT FIX WILL 
BE PROVIDED. 


Non~Production Format Service 


PTFs are applied to the lowest form of the code (Phase, Module, or Macro} in the 
target system. VSE System IPO/E 1.4.x Generation and previous System IPO/E 
systems contained modules and macros which could be assembled or link-edited to 
replace the executable code. PTIFs replaced modules or macros which required 
assembly or link-editing to activate the updated code. 


APAR fixes and problem circumventions were also provided as updates to modules 
or macros with assemblies and/or link edits required to activate the fix. 


Production Format Service 


VSE System IPO/E 1.4.x Production and VSE/SP 2.1.x systems do not provide 
modules or macros for service purposes. Service is applied to the level of code 
which is used for the day to day operation of the system. PTFs for this 
environment are created by applying the fix and performing assemblies and 
link-edits as required. The updated Phase, Module, or Macro is then extracted to 
build a PTF which corresponds to the form of the code in the user system. 
Whenever possible, the PTF will contain an updated phase with no assembly or 
link-edit required to activate the fix. 


APAR fixes and problem circumventions are also provided as updates to the level 
of code in the user system. Updates to modules and macros which are available in 
the IBM Support Center data bases will be retro-fitted by the Component 
Specialists as needed to correspond to a given system. 


Corrections to Phases 


In VSE/SP 2.1.x, PDZAP has been superseded by the MSHP CORRECT function. VSE 
System IPO/E 1.4.x Production and VSE/SP 2.1.x systems consist primarily of 
executable phases. APAR fixes and bypasses will be provided as corrections to 
phases when appropriate, to provide relief from severe problems. It is important 
that information concerning application of the fix is recorded in the system 
history file to prevent the accidental loss of the fix. MSHP CORRECT provides 
all the capability of PDZAP with the following additional benefits: 


e Automatic recording of the fix. 
° System controlled ‘Verify’ processing. 
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The VSE/SP 2.1.x Installation Manual also provides examples of using MSHP 
CORRECT to apply corrections to user programs. This provides the user with a 
method to control and track all modifications to the system. 


Product Refreshes 


VSE SP/2.1.x (including the Generation Feature and Optional Programs) is planned 
to be refreshed periodically at PID and EPL. The refreshed system will include 
service and Small Programming Enhancements (SPEs) which have been made available 
since the previous refresh. These refreshes of the system are indicated by the 
modification level. Each planned refresh will be announced and can be ordered 
through normal channels. 


The primary intent of the refresh is to provide a high level of service for the 
new VSE/SP 2.1.x user and to provide new function via SPEs, when included in the 
refresh, to existing users. Refreshes are not intended to be used for 
corrective service. 


PTFs are to be ordered and applied to correct problems. However, there may be 
exception situations when a customer will desire to bring an installed VSE/SP 
2.1.x system to a higher service level. Several things must be reviewed with 
the customer which could impact the success of the refresh installation. 


There will normally be service available beyond the refresh level. Some of 
this service could be present (and have to be reinstalled) on the customer's 
system or required in addition to the refresh. Whenever a refresh is 
considered, research must be done by the IBM Support Center Representative 
with the customer to identify this service. 


Customer changes to the system can prevent the Interactive Interface 
produced job-stream for installing a refresh from working correctly. These 
changes include but are not limited to: 

Changes to the VSE/SP Library structure. 


Modifications to IBM supplied programming. 


Additions and/or changes to IJSYSRS.SYSLIB which are not included in 
PRD2.SAVE. 


Additions and/or changes to PRD1.BASE. 
Changes to DASD layouts and/or Volume IDs. 
Relocation of System History File. 


Relocation of Job Manager File. 


Problem Determination (PD) 


Problem Determination is that set of tasks necessary to assess whether a 
suspected problem is located in hardware or software. Problem Determination is 
complete when an examination of the available symptoms has isolated the problem 
to hardware or software. 


Problem Source Identification (PSI) 


Problem Source Identification begins when Problem Determination has been 
completed and the problem is suspected to be in software. PSI is an assessment 
of where the problem resides in the customer's software. That assessment may 
include examining the available symptoms by using all appropriate expertise and 
resources (e.g., EWS, documentation, specialists, etc.). 


PSI is complete when one of the following has been identified as being the 
source of the problem: 


° IBM System Control Programming, 


° IBM Licensed Program, 
° Other IBM Program, 
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° Customer or Non-IBM Program, 


OR 
the examination reveals that there was: 


A system operator error, 

An error in the use of the IBM programming or program, 
An error in the use of other programs, 

No trouble found. 


Sd Problem Verification, Diagnosis And Resolution 


Problem Verification, Diagnosis and Resolution begins when PSI has been 
completed. It includes the necessary additional effort to decide what further 
action is required, and taking that action to resolve the problem. The 
corrective action may include the application of an available IBM fix 


» Support Structure Tasks 


The following sections outline the responsibilities of each level of the support 
structure that is involved in the service and support of VSE. The intent is not 
to define all the duties and tasks of each function, but only those directly 
related to service and support of VSE. 


IBM Support Center (Level 1) 


Level I is the first point of contact for the customer for all problems and 
service related questions. 


Level 1 responsibilities include: 
s Checking and verification of customer authorization. 
° Opening a Problem Record in RETAIN Problem Management. 


° Identifying the customer environment, i.e. SIPO/E 1.3.1, SIPO/E 1.4.x 
Production, SIPO/E 1.4.x Generation, VSE/SP 2.1.x, or other. 


e Assisting the customer with PSI. 
e Identifying customer's service level. 
e Identifying and gathering problem symptoms. 
i ES Searching the RETAIN Data Base for known problems. 


dl ° Providing an existing fix to the customer, i.e. APAR fix or PIF, if 
available. 


° Dispatching Local Support (PSR) if required. 
° Passing unresolved problems to the appropriate (Level 2 or Component 


Specialist) Location 


a = IBM Support Center (Level 2 or Component Specialist) 


—_ Handles those problems that are not resolved by Level 1. 
Responsibilities include: 
* Performing additional RETAIN Data Base searches if needed. 
e Performing component level diagnosis to isolate the source of the problem. 


oo Ben Identifying and recommending application of service which will resolve the 
fest, problem, if available. 
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° Providing a fix or circumvention when available, or retro-fitting an 
existing fix according to the customer's needs and environment. 


° Developing a bypass or circumvention in high severity situations, for new 
problems, if requested by the customer. 


° Dispatching Local Support (PSR) if required. 


° Assisting the customer in APAR preparation and submission. 


Product Change Team 


The Product Change Teams. provide third level support. 
Product Change Team responsibilities include: 

e Resolving APARS. 

* Providing a fix or PTF. 


« Providing assistance to Level 2 when required. 


Local Support 


Local support is provided by the Program Support Representative. 
PSR responsibilities include: 


e Assisting the Hardware Customer Engineer (CE). with Problem Determination 
(PD), upon request. 


e Assisting the customer with Problem Source Identification (PSI) and Problem 
Diagnosis and Resolution, upon request. 


e Assisting in the installation of APAR fixes, PTFs and circumventions, upon 
request. 


« Providing assistance to the customer in gathering problem documentation and 


APAR preparation. 


PTF Control (PTFC) 


PTF Control is the central collection point for service for all VSE products. 
PTF Control responsibilities include: 

. Performing a complete visual and automated syntax check of each PTF. 

* Testing PTFs for installability and applicability. 

° Verifying that post-install steps function correctly. 


« Returning PTFs to Product Change Teams if the PTFs fail any of the above 
testing. 


. Shipping PTFs to Programming Service Support (PSS) Mahwah and decided APSGs. 


Central Build Group (CBG) 


Central Build Group is a new group established for VSE System IPO/E 1.4.x and 
VSE/SP 2.1.x to create and verify Production Library PTFs from Generation 
Library PTFs, and to provide support for synchronization of the Production and 
Generation Library systems. Equivalent Production Library PTFs will be built for 
each Generation Library PTF. 
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Central Build Group responsibilities include: 

° Utilizing PTFs shipped through PTFC to update the master Production Library 
system. (Note: If a Product Change Team builds Production Library PTFs, then 
these PTFs may be shipped directly to PTF Control without CBG intervention.) 

* Creating Production Library PTFs. 

° Creating Generation Library PTFs for the VSE/SP 2.1.x Generation Feature. 


« Performing installation testing of Production Library PTFs. 


o Acting as a resource for Level 2 and Product Change Teams in case of 
emergency fixes. 


e Shipping Production Library PTFs to PTFC for entry into the normal PTF 
distribution process. 


. Resolving Production Library PTF build errors. 


* Maintaining Production and Generation Library systems for Refresh purposes. 


Programming Service Support (PSS) Mahwah 


PSS Mahwah receives PTFs from PTFC and integrates them into its PTF Data Base. 
This Data Base is the source for corrective PTFs in the U.S. 


PSS Mahwah responsibilities include building and shipping corrective PTF 
requests to customers when ordered. 


Area Programming Support Group (APSG) 


The APSG receives PTFs from PTFC and integrates them into their PTF Data Base. 
This Data Base is the source for corrective PTFs in EMEA. 


APSG responsibilities include building and shipping corrective PTF requests to 
customers when ordered. 


Local Marketing Team 


The Marketing Team is generally responsible for ordering IBM products, planning 
and recommending customer education, assisting the customer in understanding the 
functions of IBM products, and jointly with the CE representative assisting the 
customer with installation planning. If the customer requires assistance in 
these areas the Marketing Team should respond to that need. For example, 
Refreshes must be ordered by the marketing office when desired by the customer. 
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VSE/SP Components 


The list shows the individual product names, product and component IDs, and in 
which VSE library each one resides. 


no 
| Product PROD ID COMP ID (CLC) SUB-LIBRARY | 
| VSE/SP Unique Code 2.1 316A41  5666-31602-A41 IJSYSRS.SYSLIB | 
| VSE/Adv.Func.2.1 301A42 5666-30102-A42 IJSYSRS.SYSLIB | 

to | 
| 108-A42 | 
| 5745-SCASM-A42  IJSYSRS.SYSLIB | 
| VSE/Adv. Func.Gen.Feat. 301443 5666-30106-A43 PRD2.GEN1 | 
| VSE/SP NLS f. English 2.1 316A39 5666~-31602-A39 IJSYSRS.SYSLIB | 
| DSF1.7 DS2149 5745-SCDSF-149 IJSYSRS.SYSLIB | 
| EREP 3.1 260167 5656-26001-167 PRD1.BASE | 
| OLTEP 1.1 092923 5656-09201-923 PRD.BASE | 
| POWER2.2 273A45 5666-27301-A45  IJSYSRS.SYSLIB | 
| VSAM 1.3 AM2193  5745-SCAMS-I93  IJSYSRS.SYSLIB | 
| 5745—-SCVSM-193 | 
| 5745—-SCVCM-193 | 
| VSAM SPACE MGMT. AM2179  5745-SCAMS~I78 IJSYSRS.SYSLIB | 
| 5745—-SCVSM-178 | 
| VSAM B/R 1.2 AM2178 5745-SCAMS-I79 IJSYSRS.SYSLIB | 
| ACF/VTAM 2.1 280E27 5666-28001-E27  PRD1.BASE | 
| BTAM-ES 1.1 CG1I08 5745—SCBTM-I08 PRD1.BASE | 
| CICS 1.6 CC3A46 5746-XX300-A46  PRD1.BASE | 
| CICS Gen. Feat. CC3A47 5746—-XX300-A47. - PRD2. GEN2 | 
| ICCF 2.1 302HO2 5666-30201-HO2 IJSYSRS.SYSLIB | 
| DITTO 1.1 917127 5668-91701-I27 PRD1.BASE | 
| FASTCOPY 1.2 AM4F98 5745—-AM400-F98  PRD.1BASE | 
( asaeeeres bend et 
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Optional Programs 


list of optional programs. Check with the IBM sales representative for optional 
programs announced after the appearance of this book. 


ee * 

“| PRoDUGT PROD ID COMP ID (CLC)  SUB-LIBRARY | 

ad PL/I OPT COMPILER PL3N74 5736-PL161-N74 — PRD2. PROD 
PL/I RES LIBRARY 1.6 PL3N72 5736-LM461-N72  PRD2. PROD 


PL/I TRANS LIBRARY 1.6 PL3N73. 5 736—-1m561-N73 = PRD2. PROD 
PL/I Complete (PL3) 1.6 PL3N74 5736—-PL161-N74  PRD2.PROD 


PL3N73 = 5.736-LM561-N73 
PL3N72 5736—-LM461-N72 


| | 
| | 
| | 
| | 
| | 
| | 
| COBOL 1.3 CB1E44 5746-CB100-E44 PRD2.PROD | 
j LM4E45 5746-LM400-E45 | 
gee = he | RPG II 1.3 RG1042 5746-RG100-042 PRD2.PROD | 
\ | SORT/MERGE II 2.5 SM2F46 5746-SM200-F46 PRD2.PROD | 
od | DMS/CICS/VS 1.4 XC4H31  5746-XC400-H31  PRD2.DBASE | 
| DMS/CICS — IAG FEAT 1.4 XC4H32 5746-XC400-H32 PRD2.DBASE | 
| SQL/DS 1.2 SD1F80 5748-SD1Y0-F80 PRD2.DBASE | 
| DB/DC DATA DICT. 1.4 XXCE43  5746~—XXCOO-E43  PRD2.DBASE | 
| NCCF 1.2 XX6G44 5745-XX600-G44 PRD2.COMN | 
| NPDA 3.1 295HO8 5666-29501-HO8 PRD2.COMN | 
| ACF/NCP/vs 3705 2.1 NC2E81 5748-NC216~-E81 PRD2.COMM | 
| EP Feat of NCP 3705 2.1 CH1554  5735-SC100-554 PRD2.COMN | 
| SSP 2.1.1 SP2E78 5745-SP215-E78 PRD2.COMM | 
| ACF/NCP/VS 3725 2.1 NC2E77. 5748-NC215-E77.  PRD2.COMMN sf 
| NC2H77 5748-NC215-H77 
| EP 3725 1.1 EP1E02 5748-EP115-E02 PRD2.COMM2 | 
| NC2H77. = 5748-NC215-H77 
| DL/I 1.7 XX1H57  5746-XX100-H57  PRD2.DBASE | 
| INFO/SYSTEM 1.1 0Z1H29 5745-0Z135-H29  PRD2.DBASE | 
| SDF/CICS 1.4 XXTF92  5746-XXTOO-F92  PRD2.PROD 
| FTP 2.2 932F86 5668-93201-F86 PRD2.COMM {| 
| OCCF 1.2 XC5HO3 5746-XC500-HO3 -PRD2.COMM-~—e | 
| Access Control 1.2 XE7HO6 5746-XE700-HO6 PRD2.COMM | 
[mean J 
Distribution Tape Formats 


\ 


. Base Tape One 


Device Support Facilities (DSF) 

VSE Standalone utilities 

MSHP History File 

IJSYSR1.SYSLIB (SYSRES library backup) 
Null file 


EOB record 


Base Tape Two 


DTSFILE header label 
DTSFILE BACKUP in DTSUIL format 
EOF trailer for DTSFILE 


Null file 
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e ID and History File 
° PRD1.BASE library backup 
¢ Null file 
« EOB record 
: IESMSG online message file 


¢ Null file 


Generation Feature Tape 
e HEADER file 


¢ ID and History File 


PRD 2.GEN1 Generation Feature library backup 
bd Null file 


od EOQOB record 


Optional Products Tape (STACKED). 
* Null 


* Start of stacked tape record 
e Null 
e Product Header file (1) 


° ID and History file (1) 


* Libraries (1) 
° Null @) 
¢ EOB record (1) 
* Nuit (1) 
° Null 


¢ End of stacked tape record 
bd Null 


Note: (1) These 6 files are repeated for each stacked product. 
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INSTALLATION 


Disk Volume Requirement for Initial Installation 


a Te tT —T aT ne rere We 1 

Disk Type |DOSRES|SYSWK1|SYSWK2 | SYSWK3 | SYSWK4 | SYSWKS | SYSWK6 | 
ee 

3310 {| x | x | xX | x | x | X* — | 
= Seema Rem ore t-———++ 
3330%0% | x | x | x | x | x | xX*¥ [— | 
+- — — + —— + { 

334 Quetee | xX | x | xX xX X | xX* Xe | 
+ : ormaee a ae | 

3350 pe OE | | | | 
+———}-_—+} +——+ +—— | 

3370 fe: Oe | | 
| ao ce ——— +—— 

3375 , x | xX | —~— — | | 
+ fF aaah + | 

3380 [> Xe OK | | | 
i ares aos fate ec a i | re =i J 


Needed only when generation library is used. 

Needed for ACF/NCP/VS installation. 

Models 1 and 11. Model 11 is treated as Model 1. 

Models 70 or 70F or 3344 where one 3344 equals four 3340s. 


VSE Libraries 


System components are stored in two libraries, IJSYSRS and PRD1. A third 
library, PRD2, has six predefined sublibraries which are created during initial 
installation and can be extended dynamically, as it is a VSAM file, to contain 
more sublibraries with your optional IBM programs and your own application 
programs. 


Library.Sublibrary Space Managmt. Created by 


IJSYSRS.SYSLIB non-VSAM Stand Alone RESTORE 
PRD1.. BASE non VSAM Initial Installation 
PRD ..2 VSAM VSAM Initial Installation 

SAVE wt wt 

PROD tt 6 

DBASE . . i 

COMM Y ‘ 

COMM2 ” - 

GEN1 Interface dialog 

any other sublibrary Interface dialog 


‘The first two libraries contain VSE/SP components in object code format plus 
modules and source books required for system operation. 


IISYSRS.SYSLIB 


The components in this library give hardware and IPL Support. 


e¢¢06¢ 6 € © @ 


VSE/Advanced Functions 

Device Support Facilities 

‘VSE/ POWER 

VSE/VSAM 

VSE/VSAM Space Managements Feature for SAM 
VSE/VSAM Backup Restore Feature 

VSE/ICCF 

VSE/SP 2.1 unique code 
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PRD1.BASE 


The components in this library provide the rest of system functions besides 
hardware and IPL support. 


¢  ACF/VTAM 

° BTAN-ES 

¢  cics/DOS/VS 
¢ DITTO 

«  FCOPY 

. OLTEP 

¢ EREP 

PRD2 


PRD2.CONFIG contains user-unique members not required in IJSYSRS: 


° Members created during initial installation or by using VSE/SP 2.1 dialogs, 
for example, CICS tables and VTAM startup books. 

° Supervisors and CICS objects generated with the generation feature are also 
cataloged here. Since PRD2 precedes IJSYSRS in the library search chain, the 
production system is shielded from any errors from generation. 


PRD2.SAVE also contains members unique to your installation, but they are 
duplicated here from IJSYSRS so that, after installation of a fast service 
upgrade, they can be copied into IJSYSRS. This duplication allows to apply 
preventive service without a complete re~instailation. 


PRD2.PROD,DBASE ,COMM,AND COMM2 are default sublibraries for VSE/SP optional 
programs. 


PRD2.GEN1 is the sublibrary for the generation feature. It contains the 
generation parts of VSE/Advanced Functions and CICS and needs not to reside on 
disk except during generation tailoring and service application to VSE/Advanced 
Functions or CICS. 


PRD2 is spread over several volumes. The maximum number of library blocks (1K) 
IBM uses on one PRD2 volume at installation time depends on the disk device 
according to following list: 


3310 23808 
3330 23826 
3340 23856 
3350 112500 
3370 113460 
3370-2 113460 
3375 112500 
3380 113925 


The rest of the space on each device is empty for additional programs. 
You can define or extend non-VSAM libraries with the help of the sample job 


streams SKLIBDEF or SKLIBEXT in (ICCF) library 59 and VSAM libraries with the 
dialog "File/Catalog Management". 
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ICCF (Program Development) Libraries 


Fi el AS nec pe ye we ge SE ee eee ed 
| Library| Contents | 


| 1 | ICCF administrative library, contents shipped with | 
| | VSE/ICCF | 
| 2 | Common library, macros and procedures, VSE/ICCF | 
| | and VSE/SP 2.1 unique code members. 

| 3-7 | Empty | 
| 8 | Primary library for default operator profile | 
| 9 | Primary library for default programmer profile | 
| 10 | VSE/SP Administrative library 

| 11-49 | Empty | 
| 50-58 | Reserved for VSE/SP 2.1 | 
H 59 | VSE/SP Job Streams, Samples, and CICS Tables | 
| 60-69 | Reserved for VSE/SP 2.1 | 
| 70-99 | Empty | 


ee ete! (ae ee ar Tee ee ee On er STE Se ee eS Ce! | 


VSE/ICCF libraries are defined as common, public, or private. 


Installation 


This part of Installation describes the installation tasks for VSE/SP. 
Installation tasks are varied. Some are performed only once, such as the initial 
installation of the VSE/SP system. Others may be done periodically. For example, 
you may decide at a later time to install additional software. 


At certain times, it may be necessary to install service. The VSE/SP Interactive 
Interface provides dialogs to help you with corrective and preventive service. 
The tasks which apply service to your VSE/SP system are considered installation 
tasks. They are described in this book. 


Initial installation of the VSE/SP system involves many tasks. Some of these are 
required for all users. Others are done depending on your individual 
requirements. The tasks which make up VSE/SP initial installation are outlined 
below. 

Initial Installation of the VSE/SP System 


This task is required for all users. The subtasks for this installation 


step are: 

7 IPL to load Device Support Facilities 
7 Initialize disks 

7 IPL to load Standalone Utilities 

. Restore SYSRES 

° IPL VSE 

e Installation job stream processing 

° Install VSE/SP 2.1 optional programs 
e 


Complete initial installation 


The installation of VSE/SP optional programs during initial installation 
is optional. They can be installed later using the Interactive 
Interface. 


Change Passwords for VSE/SP User-IDs 


VSE/SP ships several user-IDs that are used for various tasks. One 
special user-ID (POST) and password (BASE) is used for the Complete 
Initial Installation subtask described above. This ID is defined to do 
special processing and is reserved for this task only. 


The passwords of the VSE/SP user-IDs should be changed. This helps to 


ensure that unauthorized users do not sign on to the system with these 
IDs. 
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Install VSE/SP Generation Feature 
This task is optional. 


It is done using the Interactive Interface. It helps you install the 
VSE/SP Generation Feature from tape. 


Install Additional Software 
This task is optional. 


The Interactive Interface provides dialogs to install VSE/SP optional 
programs and other VSE programs. 


The VSE/SP optional programs can also be installed automatically during 
Initial Installation of the VSE/SP System. 


Installation Tailoring 
Before your system is fully operational, there are other tasks you may 


want to do. For example, you might define users to the system or tailor 
your own IPL procedure. 
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a Sample Disk Layout 
DOSRES -------- 3370 
> —T T caer | 
Start Block] No of Blocks | File ID | 
[- + — | 
| 2 | 55116 VSE.SYSRES. LIBRARY | 
55118 744 | DOS.LABEL.FILEID.AREA1 | 
| 55862 | 1488 VSE . POWER . QUEUE. FILE | 
| 57350 2232 | VSAM.MASTER .CATALOG | 
59582 | 62372 VSAM .DATA. SPACE .DOSRES | 
| | %DOS .WORKFILE .SYSLNK | 
| | VSE. CONTROL. FILE | 
| | VSE.TEXT.REPSTORY.FILE | 
| VSE .MESSAGE . ONLINE | 
| | VSE.ONLINE. PROB .DET.FILE | 
| | %DOS .WORKFILE .SYS001.RECOVER | 
| CICS.AUTO.STATS.A | 
| | CICS.AUTO.STATS.B | 
| | CICS.TD. INTRA | 
| | | DFHTEMP | 
| | | CICS.csD | 
121954 | 16864 | PAGING .DATA.SET.ONE | 
| 138818 | 63240 | VSE.PRD1. LIBRARY | 
| 202058 | 90768 | LIBR.DATA.SPACE.DOSRES | 
| | | VSE.PRD2. LIBRARY | 
| 292826 | 265112 | UNUSED.SPACE | 
{ 557938 | 62 | ¥TOC | 
| ces L pe Ua Soil 
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is a at Gi i So as na a nw ae a SS me Ss a doen a a eS aa an ee is en 


SYSWK1 -------- 3370 
CT Woo T a hee i ee 
| Start Block|No of Blocks | File ID | 
|— — — 
| 2 | 55116 | SYS.NEW.RES 
| 55118 | 3460 | WORK.HIST.FILE 
| 58590 {136152 | LIBR.DATA.SPACE.SYSWK1 
| 194742 | 37200 | VSE.DUMP. LIBRARY 
| 231942 2976 | VSESP.USER.CATALOG 
| 234918 | 67704 | VSAM.DATA.SPACE.SYSWK1 
| | %DOS.WORKFILE.SYS001 
| | | %DOS .WORKFILE. SYS002 
| | %DOS.WORKFILE.SYS003 
| | %DOS .WORKFILE.SYS004 
| | %DOS.WORKFILE .SYS002.RECOVER 
| | | %DOS.WORKFILE.SYS001.SORT 
| | | %WORK.FILE.N11 
| | TO 
| | | %WORK.FILE.N54 
| 302622 8 |75144 | ICCF.LIBRARY 
| 377766 |17050 | PAGING.DATA.SET.TWO 
| 394816 | 73656 | VSE.POWER.DATA.FILE 
| 468472 | 2232 | VSE.POWER. ACCOUNT. FILE 
{| 470704 { 100 | VSESP.JOB.MANAGER.FILE 
| 470804 | 4994 | VSE.HARDCOPY.FILE 
{| 475798 { 752 | VSE.RECORDER.FILE 
| 476550 | 3460 | VSE.SYSTEM.HISTORY.FILE 
| 480010 | 186 | INFO.ANALYSIS.DUMP.MGNT. FILE 
| 480196 | 62 | INFO.ANALYSIS.EXT.RTNS.FILE 
| 480258 { 500 | VTAM. TRACE. FILE 
| 480758 | 1600 | CU379X.LOAD.FILE 
| 482358 | 1000 | CU370X.DIAG.FILE 
| 483358 | 2512 | CICS .DUMPA 
| 485870 | 580 | CICS.DUMPB 
| 486450 | 1000 | CICS .AUXTRACE 
| 487450 | 340 | CICS.MSGUSR 
| 487790 |70148 | UNUSED.SPACE 
| 557938 = | 62 | vroc 
Low i - Base tS a es Se a 
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DOSRES 


| Start Track| No of Tracks| File ID 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


1 
1104 
1152 
1176 
1296 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


VSE .SYSRES . LIBRARY 

DOS . LABEL. FILEUID.AREA1 
VSE . POWER. QUEUE . FILE 
VSAM. MASTER . CATALOG 
VSAM. DATA. SPACE. DOSRES 
%DOS .WORKFILE . SYSLNK 
VSE.CONTROL. FILE 

VSE .TEXT.REPSTORY . FILE 
VSE .MESSAGES . ONLINE 

VSE .ONLINE . PROB. DET. FILE 
%DOS . WORKFILE .SYS001.RECOVER 
CICS.AUTO.STATS.A 
CICS.AUTO.STATS.B 
CICS.TD. INTRA 

DFHTEMP 

cICcsS.cSD 
PAGING. DATA. SEV. ONE 

VSE .PRD1. LIBRARY 
LIBR.DATA.SPACE .DOSRES 
VSE.PRD2. LIBRARY 
UNUSED . SPACE 

VTOC 
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SYSWK1 


| Start Track} No of Tracks| File ID 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


‘0k 
1176 
3876 
4620 


1103 
61 
2700 
744 
168 
1104 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 2376 
| 336 
| 2316 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


SYS .NEW. RES 
WORK .HIST. FILE 
LIBR.DATA.SPACE.SYSWK1 
VSE . DUMP. LIBRARY 
VSESP . USER. CATALOG 
VSAM.DATA.SPACE .SYSWK1 
%DOS .WORKFILE .SYS001 
%DOS .WORKFILE . SYS003 
%DOS .WORKFILE .SYS004 
%DOS .WORKFILE .SYS002.RECOVER 
*DOS .WORKFILE . SYS001.SORT 
*WORK .FILE.N11 
TO 
“WORK. FILE .NS4 
ICCF . LIBRARY 
PAGING .DATA.SET.TWO 
VSE . POWER. DATA. FILE 
VSE . POWER . ACCOUNT .. FILE 
VSESP. JOB .MANAGER. FILE 
VSE . HARDCOPY. FILE 
VSE .RECORDER. FILE 
VSE .SYSTEM. HISTORY. FILE 
INFO. ANALYSIS .DUMP.MGNT. FILE 
INFO. ANALYSIS .EXT.RTNS.FILE 
VTAM. TRACE. FILE 
CU370X.LOAD.FILE 
CU370X. DIAG. FILE 
CICS .DUMPA 
CICS .DUMPB 
CICS . AUXTRACE 
CICS .MSGUSR 
UNUSED . SPACE 
VTOC 
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Interactive Interface 


This new interface is the base of the VSE/SP 2.1 unique functions. It makes the 
various functions of the VSE/SP base components as well as additional system 
services available to all users in a unified and easy to use way. In addition, 
the interface can be tailored to the personal needs of each individual user. 
Through single sign on; authorization checking and tailoring of the selection 
panels, the system can appear to each user as if it were designed especially 
for him. 


The Interactive Interface is a set of function lists, dialogs, selection and 
‘data entry panels. It allows the user to utilize the different SP 2.1 component 
programs (like VSAM/Access Method Services, ICCF and POWER commands etc.), 
without detailed knowledge of component commands. 


You sign on to the Interactive Interface from the 'VSE/SP Online' panel. Enter 
your user-ID and password. The password is not displayed on the panel. 


USER-ID...==> xxxx Xxxx - user-ID 
PASSWORD...==> yyyyyy yyYyyy ~ password 


The ID and password are checked by the system. If they are correct, the 
selection panel or application defined for your user-ID is accessed. 


If you get a message informing you that your user-ID ot password is incorrect, 
type in the information again. You may have made a mistake the first time. If it 
does not work, contact the person responsible fox defining user-IDs. 


One VSE/SP profile is used for special processing. The other three are 
predefined to reflect different levels of authorization. The default user-IDs 
and corresponding passwords are: 


User-ID Password Function 

POST BASE Complete initial installation (reserved) 
SYSA SYSA Default system administrator 

PROG PROG Default Programmer 

OPER OPER Default Operator 


The user-ID ‘POST’ is a reserved ID.. It performs special processing to complete 
initial VSE/SP installation which is described in 'VSE/SP Installation’. You 
should only use it for this task. Do not use it to do any other work. 


The other three user profiles are default profiles for: 
. System administrator 
Programmer 


* Operator 


You can use them of a day to day basis. You can also use them as models to 
define other user profiles with specific authorization. 
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Panel Hierarchy for System Administrator 


VSE/SP Function Selection 


erates 
|4 Installation 

|.2 Resource Definition 
{3 Operations 

|4 Problem Handling 

|5 Program Development 
|6 Command Mode 


1 INSTALLATION 


(Rots es et es wen pe a 
|1 Install Programs (V2) 
|2 Install Programs (V1) 
|3 Install Generation 

| Feature 


aa 


| 

| 

| 

| 

| 

| an 
f >|4 IBM Service 

| [5 Install Network Tape LW 
——— 

| 

| 2 RESOURCE DEFINITION 

| 7 

| 1 User Interface Tailor. | 

| 2 File/Catalog Managem. | 

| 3 Display VTOC | 

| 4 Local Configuration/ | ‘ao 


[ 


5 Remote Terminal Config] 
6 Change VTAM Appl. Name| 
and/or Subarea Number | 


7 Create Startup Books | 
J 


if 
| 
| 
| 
| IPL -—>|2 
| 
| 
| 
L 


1 System Console 

2 Manage Batch Queues 

3 Display Active Users/ 
Send Message 


| | 

| | 

| | 
| | | eee 
kK >|4 Enter News }+——> | 3] 

|5 Retrieve Messages | LI 
| |6 System Status 
| |7 Backup Restore | 

{8 PC Move Utilities | 

|9 Transfer Files/Jobs | 

| eee J 


4 PROBLEM HANDLING 


| Determination 

|2 Inspect Message Log 

|3 Storage Dump Mgmt. 
>|4 Inspect Dump 

| Management Output 


| 

| 

| 

| 

| f 

| |1 Online Problem 
| 

| 

| 

f 


SSS ee 


| 5 PROGRAM DEVELOPMENT 
| Sy 
[1 Program Development | 
| Library | 
| 
| 


Ke >|2 Create Application 
| Jobstream 
| Vi 


_____—_______-> § ICCF 
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11 INSTALL PROGRAMS (V2 FORMAT) 


aaa | 
|1 Prepare for | 
{| Installation | 
|2 Install Product(s) | 
| from Tape | 
>|3 Complete Installation | 
| 
| 
| 


Uae Po ICU 


12 INSTALL PROGRAMS (V1 FORMAT) 


{1 Install Product(s) 
| from Tape 
|2 Complete Installation 


ee ae, 


| 
| 
| 
| | 
| | 
| \ 
| | 
| | 
| | 


ene ee ee eee 


14 IBM SERVICE 

Gesre yp ee ee a oe ad, 
{1 Print Service Docs.. { 
|2 Apply PTF | 
|3 Alter Phase, Module, | 
| or Source | 
{4 Undo Phase or Module | 
{5 Install Fast Service | 
| Upgrade | 
| | 
| | 
| | 


v 


6 Retrace History File 
7 Remove History Record 
8 Personalize Hist. File 
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21 USER INTERFACE TAILORING 


1] 
|1 Maintain User Profiles] 
|2 Maintain Selection | 
| Panels | 
|3 Maintain Application | 

>| Profiles | 
| | 
| | 


a 


24 LOCAL CONFIGURATION AND IPL 


(ee ee 
|1 Configure HW Addresses | 
|2 Configure Local | 
| Non-SNA 3270s | 
13 Configure Local SNA_ | 
| 3270 | 
|4 Tailor IPL Procedure | 
|5 Maintain Printer FCB | 
[6 Catalog Printer UCB | 
| | 


ee ee ee ee | 


25 REMOTE TERMINAL CONFIGURATION 
ce | 

|i Configure ICA 

| connected Terminals 
|2 Configure NCP 

| connected Terminals 
L—_——->|3 Configure EP 

| connected Terminals 
]4 Create Network Tape 
| 

| 


ea eg ean | 
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cm 


| 
| 
| 
| 
= 
| 
| 
| 
| 


fo ee ed 

1 Display Syst. Activity 

2 Display Channel and 
Device Activity 

3 Invoke CEMT 


36 SYSTEM STATUS 


37 BACKUP/RESTORE 


B/R VSAM 


a—gana Gane 


v 


ANOTHER 


Backup Disk—-Tape 
Restore Tape—Disk 
Copy Disk—Disk 


Objects 


Backup History File 


1 
1 | 
2 B/R Library Objects | 
3 | 
4 Restore History File | 
5 
6 
7 


39 TRANSFER FILES/JOBS TO 


SYSTEM 


| 


1 Transfer 
Another 
2 Retrieve 
Another 
3 Submit a 
Another 


nia 


Vv 


Files to 


Files from 
System 


System 


Job to 
System 


* Selection Panel 


Selection Panel Example: 


Normal Path: 


371 B/R VSAM OBJECTS 


Export VSAM File 
Import VSAM File 
Backup VSAM File 
Restore VSAM File 
Transport Catalog 
Copy In Catalog 
Copy Out Catalog 


| 
| 
| 
| 
| 
| 
| 


NAW WDE 


| 
| 
Le 


372 B/R LIBRARY OBJECTS 


i “7 
|1 Backup VSE Library | 

{2 Restore VSE Library | 

|3 Scan VSE Library | 
| Backup Tape | 
t—>|4 Backup ICCF Library | 
15 Restore ICCF Library | 
| | 
| | 
| | 
tl J 


372 B/R Library Objects 


Select 3 in VSE/SP Function Selection 
Select 7 in Operations 
Select 2 in Backup/Restore 


Fast Path: 


Select 372 in VSE/SP Function Selection 
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Using the System Console 


The Interactive Interface has the System Console dialog to help you with console 
operations. The dialog lets you: 


° Display messages currently on the system console. 


° Display previous console messages that were written to the VSE/SP hardcopy 
file. 


e = =©6©Ask for an explanation of VSE/SP messages online. These are the messages 
which are documented in 'VSE/SP Messages and Codes'. (This facility uses 
the VSE/SP 2.1 online message file IESMSGS) 

* Enter certain console commands. 


° Reply to console messages. 


You can access the dialog as follows: 


Administrator Programmer Operator 
— : oh exe i 
| Function Selection |Function Selection Function Selection 


|3. Operations 5. Operations 


(treet ate mn a 


| 
| 
L E; 


Operations Operations 


1. System Console 1. System Console 


(eee ee ee, 
Le 


The 'VSE/SP Console Display’ panel displays current console messages (as 
displayed at the real system console). 
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Example Display of System Console Dialog 


CS ee ee a 
IBSEDCDC VSE/SP CONSOLE DISPLAY 


| 

| 

| F1 001 1Q47I1 BG TESTFL 01021 FROM (SYSA) , TIME=15:37:59 
| BG 000 // JOB TESTFL 

| DATE 05/17/84,CLOCK 15/37/59 

| F1 001 1Q34I LST WAITING FOR WORK ON 00E 
| BG 000 EOJ TESTFL MAX.RETURN CODE=0000 
| /USERS 

| AR 015 1C39I COMMAND PASSED TO ICCF 
| F2 020 K112I *** CURRENT USERS ** 
| F2 020  USER=USE1 TERM=D080 MODE=19 
| F2 020  USER=USE2 TERM=D081 MODE=19 
| 

| 

| 

| 

| 

| 

| 


(Console 

field)—> _ 
PF1=HELP 2=MSG-EXPL 3=END 4=RETURN 5=REFRESH 6=RETRIEVE 
PF7=BACKWARD 


(Command 
field)—> ==> 


PE ni a a 


Enter Console Commands 


You must have authorization to enter console commands. If you have the 


authorization in your user profile, the console field ('-') is shown at the left 


of the panel. 


Move the cursor to the console field (-)}, type in a command, and press ENTER. 
The command is sent to the VSE/SP system. A dialog displays a message which 


asks you to press PF5 to update the console display. 


You can use PF6 to retrieve commands that were previously entered from the 


dialog. 


You cannot use the following commands from the dialog: 


/cIcs /TC 
{DISC /TIF 
HALT  QEND 
PEND Z 


You cannot use the following commands for the partitions where 
VSE/ICCF ,ACF/VTAM, and VSE/POWER are running: 


CANCEL 
F 
PFLUSH 


The command 'D' to enter or control redisplay mode is sent to the system. 


However, it is rejected. You can only use it from the real console. 


The dialog has information about commands that are frequently used for 


VSE ,VSE/ICCF,VSE/POWER, and ACF/VTAM. You can display this information in one of 


two ways. 


1. Press PF1 for a selection panel. Select one of the options or use PF8 to 


scroll through the information sequentially. 


2. %In the command field (==>), type in one of the following, and press PF1. 
This provides information on the commands for the specific subsystem. 
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VSE (For VSE commands) 

ICCF (For VSE/ICCF commands) 
POWER (For VSE/POWER commands) 
VTAM (For ACF/VTAM commands) 


Message Explanation 


You can request an explanation of a message online from either the VSE/SP 
Console Display panel or any HELP panel in the dialog, This function accesses 
the online message file of VSE/SP. There are two ways to request an explanation. 


1. 


Move the cursor to the message line you want explained. Press PF2. 

If a message references another message number, you can display information 
about this message number. Move the cursor to the message number (in the 
message line). Press PF2. 


Type in the message number in the command field (==>). Press PF2. 


You can also display message information about VSE/VSAM return codes. Enter 
one of the following in the command field (==>). Press PF2. 


VSAMOPEN 
VSAMCLOSE 
VSAMREQU 
VSAMXXCB 


Note: If you enter a message number which is incorrect or which cannot be 
found, the dialog will do one of two things: 


a. Display information about a message number which closely matches the one 
you entered. 


b. Display a message telling you that the number cannot be found. 


Carefully check the panel display. Make sure that the message number you 
wanted is the one that the dialog displays. 
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Display System Activity 
The ‘Display System Activity’ dialog displays an interactive picture of the 
system's activity. You can use the dialog for summary information about the 
performance of your system. It can highlight areas where performance tools like 


CICS/PARS or VSE/PT could be used. 


You can access the dialog as follows: 


Administrator Programmer Operator 
Te se yee yey eer RO 
|Function Selection | [Function Selection | |Function Selection 


[3. Operations 


|5. Operations 


| { | | 
| | |2. Display System | 
| | Activity | 
oe IL _ a 


| Operations | |Operations | 
| | 
|6. System Status | |3. Display System | 
{ | | Activity | 
| Ean Pee Se eure 


[System Status | 
| | 
|1. Display System | 
| Activity | 


Example Display of System Activity 


‘ 


IESADMDA DISPLAY SYSTEM ACTIVITY 15 Seconds 11:25:52 
Rewer necennn SYSTEM--------- Nese sesh eee sees CICS --- n-ne en nn nnn nee ww 
CPU : 43% S10/Sec: 5 No.. Tasks 72,564 Per Sec i Zed 
Pages In : 32 Per Sec: 2 Active Tasks: 2 Suspended : 2 
2 


Pages Out: 14 Per Sec: 1 Most Active : 3 Pages Avail: 31 
Console Replies: F4- 


ID S JOB NAME PHASE NAME ELAPSED CPU TIME OVERHEAD %CPU SI0 


| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| TIME PER STEP PER STEP TINE PER STEP| 
| | 
| BG 1 IESOPDC ASSEMBLY 00:01:51 3.69 52 37% 4,080 | 
| F6 1 <=WAITING FOR WORK=> .00 .00 | 
| #5 S IESOCCF IESOCCF 02:18:57 1.01 .09 3% 485 | 
| F4 1 PAUSE 00 00:08 .00 00 6 | 
| F2 1 CICSICCF DTSINIT 04:20:49 51.80 9.71 2% 4,718 | 
| Fl S IPWPOWER IPWPOWER 04:21:27 1.38 .25 % 1,941 | 
| F3 S VITAMSTRT ISTINCVT 04:20:49 4.62 .83 2,164 | 
| | 
| | 
| | 
| | 
| | 
| PF1=HELP 3=ED 4=RETURN  5=CPU | 
| 
| | 
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SERVICE 


Preventive Service - Fast Service Upgrade 

The dialog to create the jobstream to install preventive service is invoked by 
selecting INSTALLATION on the initial system administration panel, IBM SERVICE 
on the next panel and INSTALL FAST SERVICE UPGRADE on the following panel. The 
input is required from the user to allow VSE/SP 2.1 to create the jobstream to 
install the updated system: 

« Job submission information 


* Tape unit address 


. Install updated Generation Feature - Yes/No 


Corrective Service 

Corrective service for VSE/SP 2.1 is in the form of either PTFs or APAR/Local 
fixes. They are installed by invoking the appropriate selections on the IBM 
Service panel. 

° Apply PTF 

e Alter Phase, Module, or Source 


e Undo Phase or module 


The following represents the information required to allow the jobstream to be 
created. 


e Job submission information 

e Tape unit address 

« Backup of affected libraries - Yes/No 

° Force indirect service of SYSRES - Yes/No 
° PTF numbers to be included or excluded 

i. Products to be included or excluded 


Components to be included of excluded 


PTF Delivery 

PTFs for VSE/SP 2.1. are shipped on the new 'SYSIN' format service tape. This 
tape replaces both, the old PUT tape format (library format PUT tapes) and the 
cumulative PTF tape format (corrective PTFs). 

The format of the tape is as follows: 

° File 1: History File or null file 

. File 2: Service Document or null file 

° File 3: Not used by MSHP 

¢ File 4: EXCLUDE-list er null file 

© File 5: PTF Coverletter or null file 

e File 6: PTFs 


s FILE 7: Not used by MSHP 


7 File 8: Not used by MSHP 
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The files which are not used by MSHP are present for compatibility reasons. They 
allow use of this service tape to service both VSE/SP 2.1 and prior releases of 
VSE. The files used by MSHP (files 4,5, and 6} during service application have a 
logical record size of 80 characters and a block size of 10320. File 4 will 
contain EXCLUDE statements for all PTFs contained on the tape when the tape is 
intended to be used for corrective service only. 


New Service Application Process via SYSIN Tapes. 


The user interface to install such a SYSIN tape is significantly simplified via 
the new command: 


INSTALL SERVICE. 


Via the INCLUDE and EXCLUDE detail control statements, the user may selectively 
include or exclude specific products, components and/or PTFs from the service 
application process.: 


Some interesting observations can be made about the new service process: 


. It is a one step operation, during which MSHP generates no job streams. The 
SYSIN PTFs are installed directly. 


° MSHP first builds a temporary history file, ensures protection of existing 
local and APAR fixes as well as MSHP generated members, and then prints a 
cross reference list of all applicable PTFs and APARs. 


° The user is asked to confirm application of the service. Note that the user 
may include PTFs that were marked as going to be excluded in tape file 4 and 
that the user may choose a revokable option in order to cause punching of a 
series of service backout jobs to tape during the service process. 


. Now MSHP applies the service directly for multiple products in one step 
during one pass of the tape file (provided no History file conflicts arise). 
MSHP no longer requires temporary work libraries or PUT libraries, thus 
freeing up significant DASD space. 


° In the event that the user requires to backout service, then a new command 
INSTALL BACKOUT 


will process the backout tape and backout the required service, functioning 
in the same way as the original INSTALL SERVICE did. 


° MSHP provides a new service restart capability whereby MSHP records in the 
History file when a logical series of PTFs have been applied. Later restart 
from such a checkpoint can be invoked by either of: 


INSTALL SERVICE RESTART 
INSTALL BACKOUT RESTART 


depending on whether service application or service backout was being 
carried out at the point of interruption. 


° MSHP does not apply service directly to an IPL'd SYSLIB sublibrary. The 
final linkedit step output in fact goes into an internally generated 
sublibrary IJSYSRS.SSMSHP. When the service is properly complete without 
errors, then MSHP merges the $$MSHP content into SYSLIB and purges S$$MSHP. 
If any errors occur during the final link step, then the IPL'd SYSLIB is not 
polluted. 
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Install IBM Service 


Administrator Programmer Operator 


[<a sre ae ee 
|Function Selection 


| 

| CANNOT ACCESS CANNOT ACCESS 
1. Installation | 
| 


[se Fa 


| Installation 


14. IBM Service 


Ls 


en coe 


Apply PTF 


The Apply PTF dialog applies PTFs from one or more service tapes. You can apply 
all or selected PTFs. You can also apply PTFs by: 


e Library 
° Product 
= Component 


The dialog creates a job sequence which is managed by the Job Manager. 


Overview of PTF Application 

The following information outlines the process of PTF application. 
For all PTIFs, the job sequence: 

1. Backs up affected sublibraries, if requested. 

2. Copies system history file to work history file. 

3. Applies service. 


4. Handles ICCF members. 
The job asks you to either: 


° Stop VSE/ICCF 
° Disconnect DTSFILE 
5. PTF application direct or indirect 
- PTFs applied directly: 
— Service is merged directly into the system 
- The work history file is copied back to the system history file. 
- Service application is complete. 


° PTFs applied indirectly: 


IJSYSR1 is created to store members. 


-— The job sequence instructs you to shut down your system. 


IPL from IJSYSR1. 
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Input for all Selections to Apply PTFs 


You need the following information for all selections: 


e 


TAPE UNIT ADDRESS 


TAPE QUANTITY 
Specify the number of service tapes you have for the PTFs. 


BACKUP 
Specify whether you want the sublibraries affected by service application 
backed up. 


1. YES (Backup taken) 
2. NO (Backup is not taken) 


FORCE INDIRECT 
For products in library IJSYSRS, there are two types of PTFs: 


—- Direct 

PTFs are directly merged in the running system 
- Indirect 

PTFs are applied to a new SYSRES file. 


PTFs for products not residing in library IJSYSRS are applied directly: 


The type of application for each PTF on the service tape is predetermined. You 
can accept the predetermined application or apply all PTFs indirectly. 


Alter Phase, Module or Source 


tnput for all Selections 


You need the following information for all three selections which the dialog 
offers: 


APAR/LOCAL NUMBER 
APAR number in the format XXYYYYY, where XX is: 


« Alphabetic for a formal APAR fix 
¢ The character '#' for a local fix 


BACKUP 
Specify whether you want the libraries (sublibraries) affected by 
the service backed up. 


1. YES (Back up libraries) 
2. NO (Do not back up libraries) 


REVOKABLE 
Specify whether the fix can be removed at a later time. 


1. YES (Fix can be removed) 
2. NO (Fix cannot be removed} 


The Interactive Interface provides the Undo Phase or Module dialog 
which removes a fix to a phase or module. 


If a fix for a source member is revokable, the dialog punches a job 
to SYSPCH. The job is used to remove the fix. 


TAPE ADDRESS 
The address (cuu) of the tape unit used for this task. 


AFFECTED COMPONENT 
Specify the ID of the affected component. 
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AFFECTED MEMBER 
The phase, module, or macro affected by the fix, depending on whether 
you are altering a phase, module, or source member. 
Corrections to User Phases 
The PDZAP program is not included in VSE/AF 2.1. The MSHP CORRECT function can 
be used to make corrections to user phases. A private History File should be 
created and a user Product ID and Component ID archived to allow the CORRECT 
function to modify theses phases. 
The following steps should be performed to apply a ZAP to a user program: 
e create a private History File (once only), 
° archive a User Product ID and Component ID (once only), 


° apply a correction to a user phase (mandatory), 


° retrace the User Product ID and Component ID (optional). 
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Sample Jobs 


*$$ JOB JNM=CRPHIST,DISP=D,CLASS=0 
// JOB CREATE PRIVATE HISTORY FILE 
// ASSGN SYS002,DISK, VOL=SYSWK2 , SHR 
// EXEC MSHP /* JOB HAS TO BE EXECUTED ONLY ONCE*/ 
CREATE HISTORY SYSTEM 
DEFINE HISTORY SYSTEM - 
EXTENT=128:2048 - 
UNIT=SYS002 - 
IDENTIFIER=' PRIVATE .HISTORY.FILE' 
PERSONALIZE 'M.MORRIS' - 
ADDRESS='60 WATER ST.,NEW YORK,N.Y.' - 
PHONE='633 4537' - 
PROGRAMMER='JOHN' - 
ENVIRONMENT='VSE/SP 2.1' 
/* 
/& 
*$$ EOJ 


* $$JOB JNM=ARCHPROD , DISP=D,CLASS=0 
// JOB ARCHIVE PRODUCT- AND COMPONENT ID 
// ASSGN SYS002,DISK, VOL=SYSWK2 , SHR 
// EXEC MSHP /* JOB HAS TO BE EXECUTED ONLY ONCE */ 
ARCHIVE ZAPUSE /* PRODUCT-ID */ 
DEFINE HISTORY SYSTEM - 
EXTENT=128:2048 - 
UNIT=SYS002 - 
IDENTIFIER='PRIVATE.HISTORY.FILE' 
COMPRISES 9999-MY-ZAP /* COMPONENT-ID */ 
RESOLVES 'USER ZAP HISTORY’ 
ARCHIVE 9999-MY-ZAP-USE 
/* ANY SUBLIBRARY CAN BE SPECIFIED */ 
/* IN THE RESIDENCE STATEMENT. * / 
/* IT MUST NOT BE THE TARGET / 
/* SUBLIBRARY FOR THE ZAP */ 
RESIDENCE PRODUCT=ZAPUSE PRODUCTION=ISCLIB.GERRIT 
/ ve : 
/& 
* $$ EOQJ 


%* $$ JOB JNM=APPLZAP ,DISP=D ,CLASS=0 
// JOB CORRECT USER PHASE 
// ASSGN SYS002,DISK, VOL=SYSWK2 , SHR 


// EXEC MSHP /* THIS IS THE ACTUAL APPLICATION */ 
/* OF THE ZAP */ 
/* IN THE RESIDENCE STATEMENT %/ 
/* THE "REAL" TARGET SUBLIBRARY */ 
/* IS SPECIFIED a 


RESIDENCE PRODUCT=ZAPUSE PRODUCTION=ISCLIB.ULI 
DEFINE HISTORY SYSTEM - 

EXTENT=128 : 2048 
UNIT=SYS002 - 
IDENTIFIER='PRIVATE.HISTORY.FILE' 

CORRECT 9999-MY~-ZAP : LFOOOO1 

AFFECTS PHASES=USEPHASE 

ALTER 100 5BC7:5BC2 

RESOLVES ‘CORRECTED TYPING ERROR’ 

{* 

/& 

* $S EOJ 
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* §§ JOB JNM=RETPHIST,DISP=D,CLASS=0 
// JOB RETRACE PRIVATE HISTORY FILE 
// ASSGN SYS002,DISK, VOL=SYSWK2 , SHR 
// EXEC MSHP /* THIS JOB IS OPTIONAL */ 
RETRACE PRODUCTS 
DEFINE HISTORY SYSTEM- 

EXTENT=128:2048 - — 

UNIT=SYS002 - 

IDENTIFIER='PRIVATE.HISTORY.FILE' 
. RETRACE COMPONENTS ID=9999-MY-ZAP 
/ aN /* 


= /& 
od * $$ EOJ 


Install Fast Service Upgrade 


You need the following information: 


TAPE UNIT ADDRESS 
Se The address (cuu) of the tape unit used for the FSU. 


‘ 


od NAME OF ASIPROC 
Specify the name of the JCL procedures you will use to IPL from 
IJSYSR1. The name must begin with $$. 


GEN-LIB INSTALL 
If you have the VSE/SP Generation Feature installed, specify whether 
you want to reinstall the generation library during Fast Service 
Upgrade. 


1. YES (Reinstall) 
2. NO (Do not reinstall) 


If you enter 2 (NO), the entry for the generation library is removed 
from the system history file. The sublibrary where the feature 
resides (PRD2.GEN1) is reinitialized. If you do not reinstall the 
Generation Feature, your system will then be a production system, 
rather than a generation system. 


BACKUP LIBRARIES 
Specify whether you want libraries IJSYSRS.SYSLIB and PRD1.BASE 
backed up. 


1. YES (Back up libraries) 
2. NO (Do not back up libraries) 


The dialog creates a job with the default name DTRFSU. On the ‘Job 


Disposition’ panel, you can submit the job to batch, file it in 
\ your default primary library, or both. 


Additional Considerations 


1. The job sequence runs in the background partition (BG) you should start BG 
with CLASS=0. 


2. Only one job sequence from this dialog can be in the reader queue at one 
time. 


i 
‘ , 3. Start each partition with class equal to the partition number. 


Start Fl with CLASS=1 
Start F2 with CLASS=2 


Start FX with CLASS=X 


You can start a partition with more than one class. For example if you 
usually start F4 with CLASS=I, start it with classes I and 4. 


Chapter 1. VSE/SP General Information 1-33 


10. 


11. 


12. 


13. 


14. 


Licensed, Material -- Property of 1BM © Copyright IBM Corp. 1985 


Fast Service Upgrade checks where CICS/DOS/VS and ACF/VTAM are running (Fl - 
FB). It start CICS/ICCF and ACF/VTAM (for ACF/VIAM users) in the same 
partitions in which they were running. ; 


You should have a current backup of your system available. You may. need this 
if service application is not successful. 


If you do. not have one, specify 1(YES) in the "BACKUP" field. 


VSE/SP skeletons in library 59 are replaced. If you changed skeletons, you 
should have copied them to another ICCF library before modifying them. 


VSE/ICCF members in libraries I an 2 are replaced. If you modified any 
members, save them in another library. For example, you may have changed the 
SUBMIT procedure. VSE/ICCF Installation and Operations Reference, SC33-6203 
lists the ICCF members which may be replaced. 


All members which you catalog to IJSYSRS should also be cataloged to 
PRD2.SAVE, so they are saved. 


For example, your $xJCL procedures should also be saved in PRD2.SAVE. 
If you use a SASIPROC.PROC member for IPL, save a copy in PRD2.SAVE. 
The POWER queues must be reformatted. Your POWER startup must either have a 
"first time switch’ like the one shipped or must reformat the queues. It is 


recommended that you use a ‘first time switch'. 


Do not have your own information in the following libraries. These 
libraries are replaced. 


IJSYSRS 
¢  PRD2.GEN1 


If the Generation Feature is installed: 
« It must reside in library PRD2.GEN1. 


« The generation library must be online. If it is not, the job fails. You 
would then have to exit from Job Manager processing, restore the library 
and resume the Job Manager. 


After Fast Service Upgrade, regenerate any CICS/DOS/VS tables you have 
modified. 


* Terminal Control Table (TCT) 
Use the ‘Create Startup Books' dialog. Select the TCT. The dialog is. 
described in VSE/SP System Use. 


e User modified tables 
Submit your own jobs for any tables you use. 


It is recommended that you reinstall your VSE/SP optional programs and any 
additional VSE programs after you complete FSU. This ensures that there are 
matching service levels for all system components. 


Overview of Fast Service Upgrade. Processing 


The following information outlines Fast Service Upgrade. There are two stages: 
Stage 1 and Stage 2. 


Stage 1 


In Stage 1, the job sequence: 


1. 


2. 


Backs up libraries and history file, if specified. 


Backs up DTSFILE 


The job asks you to either 
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° Stop VSE/ICCF 


e Disconnect DTSFILE 


© Copyright IBM Corp. 1985 


Before you continue, check the list output to make sure the backup is 


compiete. 


Copies system history file to work history file. 


Installs FSU for SYSRES to SYS.NEW.RES. 


MSHP lists down-level service information. After FSU, reapply any service 
you had installed which is missing in the FSU. 


Copies members and procedures to IJSYSR1.SYSLIB. 


Reinstalls Generation Feature, if specified. 
feature is already installed. 


This is done only if the 


Stores IJSYSR1 IPL procedure and jobs needed for Stage 2. 


At this point, there is a user exit. You should do the following: 


e 


Regenerate any SYSRES phases and relink them to IJSYSR1 (for example, 


supervisor or POWER phase). 


Make sure that your LIBDEF chains point to IJSYSR1 instead of IJSYSRS. This 


is needed to: 


= Use the new code. 
- Catalog to IJSYSR1. 


Shut down all partitions, except the POWER partition. 


Empty the POWER queues. 


— Mount tape, 
=~ Back up queues. 


- Delete jobs in reader, list, and punch queues. 


Shut down your system. 


IPL from IJSYSR1. Use your IPL procedure with the JCL procedure specified in 


the dialog. 


To reformat the POWER queues, reply DELETE to message '4733D'. 


Stage 2 


In Stage 2, the job sequence: 


1. 


2. 


Selectively restore FSU DTSUTIL file. 


Installs FSU for PRD1.BASE. 


MSHP lists down-level service information. After FSU, reapply any service 
you had installed which is missing in the FSU. 


Restores message files. 


Backs up and restores DTSFILE. 


This reorganizes the DTSFILE for better ICCF performance. 


Copies IJSYSR1 to IJSYSRS and renames system procedures. 


Updates work history file residencies. 


Copies work history file to system history file. 


Note: Code replacement is completed. The job sequence now processes 


startup information. 


Generates ‘base’ startup for CICS/DOS/VS. 
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Note: You can regenerate your own CICS/DOS/VS tables and options later. 
During this step, you have to respond to certain messages. You need to 
define the following: 

° TP access method: VTAM or BTAM 


° BTAM-ES users must define up to three 3270 terminal addresses (cuu). 


° VTAM users must specify whether the local control unit is a SNA control 
unit (YES/NO). 


If you reply YES, define: 

= Control unit address (cuu) 

- Terminal type (327x-y). 

-— Up to three local ACF/VTAM terminals (port number). 

If you reply NO, define up to three local ACF/VTAM terminals (cuu). 
9. Starts CICS/ICCF and ACF/VTAM (for ACF/VTAM users). 


10. Completes cleanup. 


You can now generate your own CICS/DOS/VS tables and options. When you are 
done, do the following: 


° Load your POWER queue files. 
° Shut down the system. 


* IPL form IJSYSRS. 


Problem Handling 


The dialog creates a job sequence which runs under the control of the Job 
Manager. 


If a problem occurs and you cannot resume, delete the following jobs in the 
VSE/POWER reader queue: 


. DTRSTFSU 
* DTRCLFSU 
« All jobs beginning with the prefix DTRFSU 


If you do not do this, the Job Manager may not work correctly at a later time. 


If you cannot resume , there are other things you should also do. This depends 
on whether you exit during Stage 1 or Stage 2 of the FSU process. 


. Stage 1 


Your system has not been changed up to the installation of the Generation 
Feature (for Generation Feature users only). If you exit either during or 


after this job step, you must restore your old generation library, if it was 


online. 
« Stage 2 
If you exit and cannot resume during Stage 2, do the following: 
= Shut down your system 
— IPL from IJSYSRS 
— Restore the following: 
- Old DTSFILE 


- Old PRD1.BASE library 
- Old generation library 
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PROBLEM DETERMINATION AIDS 


Dump Processing in VSE/SP 2.1 


c.... fea yas el 
| DUMP | | CANCEL | 
| Option | | Command | 


| 

| 

| 

| 

| | 

Common |<——__J 


rere 
| | 
| DUMP | 
| DUMP [|—— | | 
ye Wh | Command | | | Library | 
: 3 bb a] eae 
ed car ce 
| SA-DUMP +— | | | | | To Tape 
SS oh Ni | | 
eee ul | | | A 
ie ie 
--v-v-—1__}—_—— eames : nae 
Onload | | Offload 


a 
| | 
co INFO L_, | 
| | | 
| ANALYSIS | | 
Vv V | 
| 


Print/Display Analyze SA—Dump 


SS a ries | 
jInteractive |<—————— VSE }+—---———> |Hardcopy | 
lee eel 


[User | | Power | 
|Interface_ | |List | 
{| Queue] 
| | 
Vv 
i. Dane wil 
| Display | 
| eee Recerca 
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Summary of Dump Facilities 


(dump routines) 


Debug Area 


SVA 


SSS Ss 
|OTHER SUBSYSTEMS | 


(IDUMP) | 


| BATCH (various | 
| ways to dump) | 


SUPERVISOR 


| 

Fa a Le eee 
Debug Area | 

| 


ciICS/VS 
(DFHACP) }——_——-> | DUMPA / B| 
eres | 


| 
| oa 


| IESPRB |—Problem File 
(OLPD) |->|———- | 
| |IESTRFL|—Message File 
{ | een | 
Wie Se ee 


| 


]o STDOPT SYSDUMP=YES|NO,DUMP=PART| YES 
lo OPTION DUMP| PARTDUMP , SYSDUMP | NOSYSDUMP | | o 
|o LIBDEF DUMP, CATALOG=SYSDUMP . BG| Fn 


| 


lo INFO/ANALYSIS (batch and interactive) | jo 
Jo VSE/SP Online Problem Determination 
pe 


DUMP ANALYSIS TOOLS 


DUMP MEDIUM SPECIFICATION || 


peemene | 


Handling of Dumps via HH 


||o 


||o 


[lo 


© Copyright IBM Corp. 1985 


eee EIS | 
{ SYSDUMP. Fn | 


| SYSDUMP. BG | 


| 
| 
| 
| |TAPE | 
Vv 


eT Tey | 
|sysLstT |<—1 


| 
| 
| 
| 
| 
| 
| | 
vo 
| 
| 
| 
| 
| 
| 
| 
| 


DUMP INVOCATION | 
| i 
DUMP Command 

CANCEL Command 

CANCEL macro 


IPL Standalone Dump 


PDUMP|DUMP|JDUMP macro 


IDUMP macro 


| 
| 
| 
svc 50 | 
| 
| 
CICS/VS ACP Service | 

| 


Superv. Cancel Service 


The II uses the VSE/SP function STORAGE DUMP MANAGEMENT to display a list of 


‘dumps either in the Dump Library or offloaded to tape. The functions selected 


from the Dump Management Panei calls the program Info/Analysis (INFOANA) using 


it's batch functions. 
Queue, 


function. 


The output of INFOANA will be put into the POWER LIST 
from where it may be displayed using the INSPECT DUMP MANAGEMENT OUTPUT 


The following functions are provided to handle a dump via II: 


1+38 


List dump names 


Delete a dump 


Select a dump for processing 


Off load a dump to tape 
On load a dump from tape 
Display of the Symptom String 


Display of formatted control blocks 


IBM VSE/Advanced Functions Handbook 


__ 


Licensed Material - Property of 1BM 
¢ Display of unformatted dump data 
° Search for data string 

* Search for an address 

* Scrolling through the dump 


¢ Standalone dump analysis 
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The Storage Dump Management menu provides a list of system managed dumps. 


Example of Storage Dump Management Panel 


| 
| PRBSIDH1 STORAGE DUMP MANAGEMENT | 
| LIST OF SYSTEM MANAGED DUMPS | 
| | 
| OPTIONS: 2 = PRINT SYMPTOMS 3 = PRINT DUMP 4 = ANALYSE SA DUMP | 
| 5 = DELETE DUMP 8 = OFFLOAD DUMP 9 = ONLOAD DUMP | 
| TAPE | 
| OP 9 --------- DUMP NAME -------- ONLINE DATE TIME LABEL| 
i SYSDUMP F2 00000003. _-X 85/01/31 16:57:10 

| - SYSDUMP F2 00000002 Xx 85/01/31 16:12:09 

{oo SYSDUMP F2 00000001 xX 85/01/31 14:40:07 
pi. 8S SYSDUMP F2 oo000000 §=X 85/01/31 14:30:39 
{ = | 
i 2 | 
| es | 
-~ | 
| ONLOAD EXTERNAL DUMP ?....... 2 2 = no, l=yes 

| PF1=HELP 3=END 5=RETRY 6=PROCESS | 
| | 
| | 
1 =J 


Key setting available for DUMP viewing: 


PF Key Function 

PF3 Cancel (End) 
PF4 Cancel (End) 
PFS Address Search 
PF6 Data String Search 
PF7 Scroll Backward 
PF8 Scroll Forward 
PF9 Go To Top 

PF10 Shift Right 
PF11 Shift Left 

PF12 Go to Bottom 


ONLINE PROBLEM DETERMINATION (OLPD) 


Online Problem Determination (OLPD) provides assistance in analyzing CICS 
transaction abends interactively. It collects, stores and analyzes error data 
from the transaction dump and provides the ability to list, display and delete 


this information. 


Note carefully, that if one removes the invocation of IESOPDS from DFHPEP, OLPD 
will be inoperative. That is, it will not be invoked to collect problem 


information. 
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When a CICS transaction ends abnormally, the following actions occur: 
e CICS writes the transaction dump to the active CICS dump dataset. 
¢ OLPD gets control, builds and incident record and stores it. 
ba OLPD saves the screen in use at the time of the abend. 
¢ OLPD shows the user and abend information panel. 
¢  OLPD redisplays the original screen. 
bd CICS regains control and continues abend processing. 


° CICS displays message DFH2005I on the user screen. 


OLPD TASKS 

The tasks available to the user to perform Online Problem Determination are: 

¢ Display the last incident for a specific user. 

° Purge the last incident for a specific user. 

e List all incidents for a specific user. 

¢ List all incidents for all users. 

The user selects the desired task from the initial OLPD panel. Incidents are 
displayed either by selecting the last incident for a user or by selecting from 
a displayed list of incidents. 

An incident report consists of several pages. The text of each page is divided 
into one or more paragraphs. Further information concerning each paragraph can 


be obtained by selecting the paragraph number. The number of pages and 
paragraphs varies according to the type of error. 
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VSAM SERVICEABILITY ENHANCEMENTS 


The VSE/VSAM Rel. 3.1.0 SPE which is integrated in SP 2.1 makes the handling of 
the SNAP dump facility easier and faster. SNAP 0001, for example, prints error 
symptom messages for Catalog Management return codes at the console thus 
providing an error code trace during problem programs processing. The SNAP dump 
can now be invoked in any partition and be enabled or disabled for any partition 
without influencing execution or output in other partitions. A help function is 
also provided which shows how to enter SNAP requests. 


Enabling and Disabling SNAP Dumps 
The new snap dump support provides the following advantages: 


There are now all 11 snap points per partition, i.e. a snap point can be 
enabled or disabled for only one partition at a time. 


* No re-IPL is necessary after a snap point is changed; after each IPL all 
snap points are reset to their original states. 


be The original states of the snap points after IPL are: snap 1 to 9 and 11 are 
in disable mode and snap 10 is in enable mode. 


There are 11 snap points available in VSAM. Each snap ID, if enabled with 
IKQVEDA in a specified partition, will produce the result indicated (only for 
this partition). The output for snap dump 0001 goes to SYSLOG; the output for 
dumps 0002-0009 and 0011 goes to STSLST. Snap 0010 produces no output. 


Snap Number Result of Enabling this Snap: 


0001 This snap allows Catalog Management diagnostic information to be obtained 
(see Section "Using UPSI to Obtain Diagnostic Information for the VSAM 
Catalog" for details) (IKOVCAT). 


As snap 0001 uses the UPSI byte, it cannot be run when the user program in 
the partition also uses the UPSI byte. 


0002 This snap enables the Buffer Manager trace, which provides the current 
usage of VSAM buffering (IKQVRM). 


0003 This snap enables the CLOSE control block dump at the beginning of CLOSE 
processing (IKQVCLOS). 


0004 This snap enables the VSAM I/O trace facility (IKQVRM). 
0005 This snap enables the I/O error trace (IKQVRM). 


0006 This snap enables the OPEN control block dump facility when open 
processing is complete (IKQVOPEN). 


0007 This snap enables the OPEN error trace. Control blocks are printed if an 
error occurs during open processing (IKQVOPEN). 


Depending on where the error occurred in OPEN processing, Output may or 
may not be produced. For example, module IKQOPNDO (clean-up after open 
failure) invokes SNAP 0007, but IKQOPNDO is not invoked after every OPEN 
failure. 


0008 This snap enables the Catalog Management I/O trace. All I/O operations 
done by catalog management are printed on SYSLST (IKQVCAT). 


0009 This snap enables the VSAM Record Management error handler trace, allowing 
display of control blocks for any error detected by VSAM record management 
(IKQVRM) . 


0010 This snap enables automatic close. VSAM is shipped with this snap enabled. 
To disable automatic close, disable this snap ($$BACLOS). 


0011 This support enables the managed-SAM control block trace. Refer to 


VSE/VSAM Management for SAM Feature Logic for further information 
(IKQSMMON) . 
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IPL CONTROL STATEMENTS 


fae ce a a a Vode Pf pe es oe es See 8 ee ee pie Se tee pee 
| Operation | Operands | 


| ADD 


| cuu[:cuu]..cuu][(S)],device-type[,ss],ssss] | 
»ssssss|,SHR] 


[ee ee ee re ee 


The ADD command is used to define the physical I/O devices attached to the 
system. The device addresses are entered into the PUB table. Either a single 
device or a series of devices of the same type can be added with one command. 


cuu 


Indicates the channel and unit number of the device(s) to be added. 
Leading zeros can be omitted (for example, ADD 00C,2501 may be 
coded as ADD C,2501). 


The format cuu:cuu or cuu..cuu indicates that a series of devices 
of the same type, starting with the first cuu and ending with the 
second cuu is to be added. For example 


ADD 130:137,3330 


defines eight 3330 devices with addresses 130 through 137. If this 
type of specification is used for 2703 devices, all addresses must 
designate either Start/Stop or BSC lines. 


Indicates that the device can be switched (that is, physically 
attached to two adjacent channels). The designated channel is the 
lower of the two channels. For the device on which the lock file 
resides, S must not be specified together with SHR. 


device-type Specifies the device’ type code of the device to be defined; 


ss Device specification (mode). 
SSSS Fape.ss specifies the mode setting (see ASSGN 
SSSSSS Statement). If it is omitted, the following values are assigned: 
CO for 9-track tapes (2400, 3410 series) 
DO for 9-track tapes (3420, 3430 series) 
60 for 8809 Magnetic Tape Unit 
90 for 7-track tapes. 
3284, 3286, 3287, 3288, 3289. ss must be entered as 01. 
ss is required for a 3284/3286/3287 printer used as console printer 
for a 3277 operator console. The required entry is 02 or 04. 
2702. ss specifies SADxx (Set Address) requirements: 
00 for SADO (default) 
01 for SAD1 
02 for SAD2 
03 for SAD3 
1270, 1275, 1419, 1419P, and 1419S. ss specifies the external 
interrupt bit associated with magnetic ink or optical character 
readers. The settings 01 through 20 correspond to the external 
interrupt code in low storage byte 87, bits 7 through 2 
respectively. 
01 byte 87 bit 7 
02 byte 87 bit 6 
04 byte 87 bit 5 
08 byte 87 bit 4 
10 byte 87 bit 3 
20 byte 87 bit 2 
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3704/3705/3725. ss is required and specifies the type of channel 
adapter: 


01 Type 1/4 channel adapter 
02 Type 2/3 channel adapter 


For the 3705 SDLC Integrated Communication Adapter for the 4300 
processors, the mode setting must be 10. 


2703. For the 2703 BSC Integrated Communication Adapter for the 
4331 Processor, ss can be: 


40 EIB mode (Error Index Byte is to be set.) 
00 non-EIB mode 


Model 158, 3031, 3033. If you want to use, for example, a 3277 as 
operator communication device on a Model 158 or 3031, you can 
define the PAl (request) key to be the PF-1 key by setting bit zero 
of the device specification byte to 1 (for example X'80'): 


ADD 140,3277,80 


SHR Indicates that the device to be added may be shared by two or more 
CPUs. SHR is valid only for the 33xx CKD device types and the 3370 
FBA device. For the device on which the lock file resides, SHR may 
not be specified together with S. For ready disk units, the SHR 
option is reset during IPL if the disk unit is physically not 
shareable. 


ae ge oe ee eg 0 ke pg ge ee oe eal 
| Operation | Operands | 


| DEF | SYSREC={cuu]|volser}[,SYSCAT={cuu|UA|volser}] | 
i a a ap en et ee ee, 


The DEF command, which is mandatory, is used to assign a physical device to 


° SYSREC, the logical device for the system recorder file, the hardcopy file, 
and the system history file 


° SYSCAT, the logical device for the VSE/VSAM master catalog 


cuu Indicates the channel and unit number of the physical device to be 
assigned. 

SYSCAT=cuu May be specified only if VSE/VSAM is installed in the system. 

SYSCAT=UA Is the default value. 

volser Indicates the unique volume serial number of the disk to be 
assigned. 


The assignments cannot be changed until the next IPL. 


Pat se ee ch a en eh ge re ee ee 


| Operation | Operands | 
——— aa 
| DEL | {cuu[:cuu|..cuu]} | 


Ee ee |S eI ee a En ee ee ee: | 


The DEL command is used to delete one or more of the I/O devices previously 
defined with the ADD command. 


cuu Indicates the channel and unit number of the device(s) to be 
deleted. 


The format cuu:cuu or cuu..cuu indicates that a series of devices 
of the same type, starting with the first cuu and ending with the 


second cuu is to be deleted. For example, 


DEL 130:133 
causes devices 130, 131, 132, and 133 to be deleted. 
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a a Le a a aR 
| Operation | Operands | 


| DLA | NAME=areaname{ , UNIT=cuu] | , VOLID=volser}[ ,DSF={Y|N}] | 
| | [,CYL=n[,NCYL=m] | ,BLK=n[ ,NBLK=m] ] 


The DLA command, which is mandatory, defines or references a label information 
area. This area may be located on any disk device. Format and layout of the 
label information area are determined by the system. 


The DLA command must be entered after the ADD (and DEL) commands and before the 
SVA command. Only one valid DLA command may be entered. 


NAME=areaname Specifies the name of the label area, which can be one to eight 
alphameric characters. When the label area is first created, this 
name is entered in the VTOC of the device indicated in the UNIT or 
VOLID operand (in the form: DOS.LABEL.FILE.cpu-id.areaname). When 
referring to the label area during subsequent IPLs, use only the 
NAME and UNIT or VOLID operands. 

UNIT=cuu Specifies the channel and unit number of the device containing the 
label area. The device type may be different from that of the 
SYSRES device. This operand may be specified together with VOLID. 

VOLID=volser Identifies the unique volume serial number of the device containing 
the label area. This operand may be specified together with UNIT. 


DSF=Y|N Specifies whether the label area is to be data-secured. If the 
operand is omitted, DSF=Y (Yes) is assumed. 
CYL=n Indicates, for CKD devices, the sequential number of the cylinder, 


relative to zero, where the label area is to begin. nm must be a 
decimal number with one to three digits, with a minimum value of 1. 

BLK=n Indicates, for FBA devices, the sequential number of the block, 

relative to zero, where the label area is to begin. nm must be a 

decimal number with one to three digits, with a minimum of 2. 

NCYL=m Defines, for CKD devices, the size of the label area in number of 
cylinders. m must be a decimal number with one to three digits. 
If this operand is omitted, the device dependent default size is 
used. The maximum value for m is also device dependent. The 
table below gives the appropriate default and maximum values for 
the supported disk devices. 


Device | NCYL Specification: 
Type | Default Maximum 

ee ee (Pom oes ose alctete ming a melee 
2314 =| 2 12 

3330 | 2 13 

3340 | 3 20 

3350 | 1 8 

3375 | 3 20 

3380 | 3 16 

NBLK=m Defines, for FBA devices, the size of the label area in number of 


blocks. m must be a decimal number with a minimum of 12 and a 
maximum of 992. If this operand is omitted, the default, which is 
200 blocks, is used. 


Note: If you want to use previously created standard labels, enter the DLA 
statement with only the NAME= and UNIT= or VOLID= operands. When you specify 
CYL and NCYL (or BLK and NBLK), any existing label area is destroyed. 


SS SSS SS SS SSS 
| Operation | Operands | 


| DLF | {UNIT=cuu|VOLID=volser}{ ,CYL=n[{,NCYL=n} |, BLK=n 
| | [,NBLK=n]][,DSF={Y|N}][,TYPE={N|F}] [,NCPU=n] | 
a se po 


The DLF command is used to define or reference the cross-system communication 
file (lock file). This file must be present when two or more VSE systems are 
linked in a DASD sharing environment. The DLF command is required if the 
supervisor was generated with DASD sharing support and if devices are present 
which are defined with the SHR option in the ADD command. 
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The lock file has to be on a disk drive which is physically shared with all 
systems linked in the DASD sharing environment. The device on which the lock 
file resides must not be defined as switchable. If used, the DLF command must 
be the first command after the ADD (and DEL) commands. 


UNIT=cuu Specifies the channel and unit number of the device containing the 
lock file. 

VOLID=volser Identifies the unique volume serial number of the disk containing 
the lock file. 


No operands other than UNIT or VOLID are needed if an existing lock 
file is to be used. If, however, a new lock file is to be created 
or if a reallocation is required, the following operands are also 
needed: 

CYL=n Specifies, for CKD devices, the sequential number of the cylinder, 
relative to zero, where the lock file is to begin. NM must be a 
decimal number with one to three digits. 


NCYL=n Specifies how many cylinders of a CKD device are to be allocated to 
the lock file. The default is 1. 
BLK=n Specifies, for FBA devices, the sequential number of the block, 


relative to zero, where the lock file is to begin. Mm must be a 
decimal number with a minimum of 2. 


NBLK=n Specifies how many blocks of an FBA device are to be allocated to 
the lock file. The default is 30. 

DSF=Y |N Specifies whether the lock file is to be data-secured. If the 
operand is omitted, DSF=Y (Yes) is assumed. 

TYPE=N|F N, which is default, indicates that the lock file is not to be 


formatted. If you specify TYPE=N, but the lock file does not exist 
on the specified device or volume, the system ignores the operand 
and formats a new lock file. 


F indicates that the system should format the lock file during IPL. 
Use this option to reformat an already existing lock file. 

NCPU=n Specifies the number of machines, real or virtual, in the DASD 
sharing environment. Valid specifications for nm are 2..31. The 
default is 4. 


If the CYL or BLK operand is specified, and a lock file has already been 
defined, an error message ('DUPLICATE NAME ON VOLUME') is returned if the extent 
limits do not match. If the extent limits do match, the existing lock file is 
used. A new lock file is not formatted, and the VTOC is not updated, regardless 
of the specification in the DSF operand. 


The maximum number of resources that can be locked by a lock file of a given 
size can be calculated by the following formulae. 


° For FBA devices: 
Number of resources = NBLK * 508 / (12 + NCPU) 
. For CKD devices: 


Number of resources = NCYL * 508 / (12 + NCPU) * D, 


where D is a device-type-dependent factor of: 
308 for IBM 3330 
144 for IBM 3340 
810 for IBM 3350 
480 for IBM 3375 
690 for IBM 3380 


a rs i ea a aa 
| Operation | Operands | 


| DPD 


| 
| | 
= i 


{UNIT=cuu | VOLID=volser},{CYL=n|BLK=n}{,NCYL=m| ,NBLK=m] | 
[, TYPE={N|F}][,DSF={Y|N}J | 


The DPD command, which is mandatory, is used to define the page data set. The 
command is invalid if the VM/370 linkage facility is included in your system. 


The operands of the DPD command may be given in any order. 
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UNIT=cuu Specifies the channel and unit number of the device that is to 


contain the page data set. If you omit this operand, you must 
specify the VOLID operand. 


VOLID=volser Identifies the volume serial number (one to six alphabetic or 


numeric characters) of the disk pack that contains the page data 
set. If this operand is omitted the volume serial number is not 
checked. 


CYL=n Specifies, for CKD devices, the sequential number of the cylinder, 


relative to zero, where the page data set is to begin (in decimal). 
A specification of CYL=0 indicates that the page data set extent is 
to begin on cylinder 0, track 1. 


BLK=n Specifies, for FBA devices, the sequential number of the block, 


relative to zero, where the page data set is to begin. hn must be 
a decimal number with a minimum of 2. 


NCYL=m Specifies, for a multi-extent CKD page data set, the size of one 


page data set extent (in number of cylinders). m must be a 
decimal number with up to three digits. 


NBLK=m Specifies, for a multi-extent FBA page data set, the size of one 


page data set extent (in number of blocks). m must be a decimal 
number with a minimum of 4. 


TYPE=N TYPE=N is the default and indicates that the page data set need not 


be formatted. The TYPE operand is ignored for FBA devices. 

If TYPE=N is specified, but the page data set does not exist, or 
the extent limits have been changed, TYPE=N is ignored and the page 
data set is formatted during IPL. 


TYPE=F Indicates that the page data set is to be formatted during IPL. 


Formatting during IPL is required if the page data set has been 
damaged. A page data set on a shared CKD device is always 
formatted. The TYPE operand is ignored for FBA devices. 


DSF=Y|N Indicates whether the page data set is to be data~-secured. Yes is 


For 


the default. For multi-extent page data sets, the DSF 
specification is valid for the first extent definition only; it is 
ignored for any further extent definitions. 


each extent of a multi-extent page data set, a separate DPD command has to 


be entered. After each command, the operator will be prompted to enter the next 
extent definition until 


the entire virtual storage is mapped on the specified extents, or 
the maximum number of extents allowed (which is 15) is exceeded, or 


the operator enters a DPD command without the NCYL/NBLK operand, in which 
case the complete remaining storage will be mapped on this extent. 


Up to 15 extents can be specified, which may reside on different volumes; up to 
three extents may be allocated on one volume. The various extents can be placed 
on different CKD device types, or can be mixed with FBA device extents. 


If the size specified in the NCYL/NBLK operand is larger than the size actually 
needed for the page data set, the free cylinders/blocks are available to the 


user. 

f =. 1: — 
| Operation | Operands | 
_ $+ 

| SET | [DATE=mm/dd/yy , CLOCK=hh/mm/ss ] [ , ZONE={EAST|WEST} /hh/mm| 
tir a da cot en oe Shs eR na ne ey ee) 
The SET command, which is optional, is used to set the system date, the 


time-of-day (TOD) clock, and the system time zone. It is required only if the 
TOD clock has not been set since the last POWER ON; IPL will then prompt the 
operator to enter the SET command. The command may be entered at any time 
before the SVA command. 


DATE=mm/dd/yy Specifies the date in months (1-12), day of the month (1-31), 


and year (last two digits of the year). 


After IPL this format can be changed to dd/mm/yy with the 
STDOPT command. 


CLOCK=hh/mm/ss Specifies the local time-of-day in hours, minutes and seconds. 
ZONE=EAST/hh/mm Specifies that the installation is located at a geographical 
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position east of Greenwich. 
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ZONE=WEST/hh/mm Specifies that the installation is located at a geographical 
position west of Greenwich. 

hh/mm Indicates the difference in hours and minutes between local 
time and Greenwich Mean Time. hh may be in the range 0-23, mm 
in the range 0-59. 


The operands that have to be specified with the SET command depend upon the 
state of the TOD clock. The following groups can be distinguished: 


1. If the TOD clock is in the set state, the command may be given in one of the 
three forms: 


SET ZONE= 
SET DATE= ,CLOCK= 
SET DATE= ,CLOCK= ,ZONE= 


2. If the TOD clock is in the not-set state, the command must be given in one 
of the two forms: 


SET DATE= ,CLOCK= 
SET DATE= ,CLOCK= ,ZONE= 


3. If the TOD clock is inoperative, the command must be given in the form: 
SET DATE= ,CLOCK= 


Note: If the TOD clock is in the set state, message OI30I is printed. 
If the TOD clock is in the not-set state, message OI31I is printed. 
If the TOD clock is inoperative, messages OI32I and OI311 are printed. 


SSS SS 
| Operation | Operands | 


| SVA | {SDL=n] [ ,PSIZE=nK] [ ,GETVIS=nK] 
Ne ee 


This command is mandatory and must be the last command entered during the IPL 
procedure. It is used to allocate space within the SVA into which the user can 
later load his phases. 


All operands are optional. If the operands are not entered during IPL, there 
will be no space reserved in the SDL and SVA for user phases. 


SDL=n Specifies the decimal number of entries in the system directory 
list to be reserved for user phases and IBM-supplied phases, in 
addition to the phases loaded automatically during IPL. The 
maximum number that can be specified is 963, minus the number of 
SDL entries for the automatically loaded phases. 

Note that only phases from IJSYSRS.SYSLIB and those generated with 
the SVA operand in the linkage editor PHASE statement can be loaded 
into the SVA at IPL. 

PSIZE=nK Specifies the size of the area within the SVA which is to be 
reserved for user phases. nm must be a decimal number and a 
multiple of 2. 

GETVIS=nK Indicates the size of the additional system GETVIS area which you 
can specify beyond the minimum size (48K) allocated by the system. 
n must be a decimal number and a multiple of 2. 


| Operation Operands 


| SYS 


[ CHANQ=n } [ ,DASDFP=YES |NO] { ,SEC=YES|NO] [ ,SUBLIB=m] 


T 
| 
! 
| 
| [,JA=YES|NO][,SDSIZE=nK] [ BUFSIZE=n] 


eveailin a 


The SYS command, which is optional, specifies: 


The number of channel queue entries to be allocated, 
Whether DASD file protection should be active, 
Whether security checking should be active, 

The number of sublibraries which can be assigned. 
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¢ Whether job accounting should be active, 
The size of the shared area for system monitoring functions, and 
The number of supervisor buffers used for I/O processing, 


CHANQ=n 


DASDFP=YES | NO 


SEC=YES |NO 
SUBLIB=m 


JA=YES {NO 


SDSIZE=nK 


BUFSIZE=n 


ih. wrt eo 
| FASTTR= | 


| NO | 


Specifies the number of channel queue entries to be allocated. If 
you omit the operand, the system allocates the appropriate number 
of channel queue entries for the number of partitions active and 
the type and number of devices added. 


feces aye ie at? wet )0606€«UCM Ge ae 
| MINIMUM | n=pta | 

ee 
| DEFAULT | n=(2+d)*p+at+15 


| 
| (If this expression yields a value greater | 
| | than 255, the maximum value of 255 is used)| 


| MAXIMUM | n=255 | 
pe 
| p= number of partitions specified in NPARTS operand. | 
| d= number of disk devices added by ADD commands. 


| 
| a= total number of ADDed devices. 
LS ae 


Specifies whether DASD file protection should be active. If you 
omit the operand, the system does not activate file protection. 
Specifies whether access control should be active. If YES is 
specified, the system carries out access authorization checking, 
and, if VSE/Access Control is available, access logging is 
activated. 

Specifies the number of sublibraries which may be attached to the 
whole VSE/Advanced Functions system at any one time. m must be a 
decimal integer from 10 to 2000. If the operand is omitted, the 
system uses the default value of 100. 

Specifies whether job accounting should be activated. If YES is 
specified, CPU-times and SI0's for all devices are accounted. 
Specifies the size of a shared V=R area for system monitor 
functions, for example SDAID. This operand is valid only when the 
System is running in 370-mode. Valid specifications for n are 
from 0 to 256. The default is 48. 

Specifies the number of supervisor buffers to be used for I/O 
processing. The operand is invalid if the VM/370 linkage facility 
is included in the system (that is, the system is running in VM 
mode). 


n must be a decimal number with a maximum of seven digits. The 
following table shows the minimum and default values for BUFSIZE. 


These are dependent on whether the supervisor is generated with 


the option FASTTR or not. 


T 4 
Default | Minimum | 


SS 
n=60 | n=10 | 


| YES | 370 mode: n=60+(p-2)20 | n=30 | 
| | ECPS:VSE mode: n=120+(p-2)*40 | n=60 | 
H 
| 


| p = number of partitions specified in NPARTS. 
eee ae anena 


FASTIR and NPARTS are parameters of the FOPT and SUPVR generation macros, 


respectively. 
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JOB CONTROL AND ATTENTION ROUTINE COMMANDS 


Job Control Overview 


I a T 1 
| | | Valid for | 
| Type of Command or Statement | Operation | JCS AR Jcc | 
} t Se ee ee 
| Job Identification JOB | xX | | | 
| /& | xX | | | 
a 4+} 
| User Identification | ID | x | | xX | 
p= ens 5 a 
| File Definition DLBL | X | 
| | EXTENT | XK | | 
| TLBL | K | | 
| | /* [| xX | 
| /+ | xX | | 
t it +——— 
| Library Definition LIBDEF | x | | xX 
| | LIBDROP | x | x 
| LIBLIST | x | |) 2% 4 
- or 
| Pass Information to Operator | * | X | | 
aaa amr |e f REA ae 
| Job Stream Control BATCH | | X | | 
| | CANCEL | } x& [| XxX 
| | PAUSE | x {| x | x 
| | PRTY | | xX | Xx 
| START | | x | x | 
| | STOP | | | x | 
| | TPBAL | { x | 
| | UNBATCH | | | see 
| | | | | Note | 
Jp 
Setting Symbolic Parameters | SETPARM | x | | x 
| PROC } x | { x | 
ee ee 
Conditional Job Control | /. [ie eke 5] | 
| | GOTO fe oXee 4 his OX 
| IF [ae Gl { x | 
| ON | xX | | xX 
~ be 
| Setting System Parameters | ALLOC | | x | X | 
| ALLOCR | hi ah ts Tae ol 
| | MSECS | | xX | X 
| | NPGR | | | x 
| SET | | | x | 
| SIZE | J 2X ous x 
| | STDOPT } x | | 
' 4+ 
| Pass Information to Program DATE X | | | 
| | OPTION x | | 
| | OVEND fe Ke | .< 
| | UPSI |, Re of | | 
— + ! p+ 
| Execution of Program EXEC xX | | X 
| | RSTRT [| x | | 
os t SSS 
| Operator Communications ALTER | X | | 
| | DSPLY | x | 
| | DUMP | | x | | 
| END or | | 
| | ENTER key tee. i OS 
| | IGNORE | |} xk | xX 
LOG | | x | Xx | 
| MAP ; x [| x 


Note: 


Valid only in a foreground partition. 
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| | | Valid for | 
| Type of Command or Statement | Operation | JCS AR Jcc | 


|— 


Operator Communications 


| MODE | 
| MSG | 
| NEWVOL | 
| NOLOG | 
| ONLINE | 
| RC | 
| REPLID | 
| SETMOD | 
| UNLOCK | 
| ZONE | 
—— $f —______}___+—_++-—+ 
Control of I/O System | ASSGN | 

| CLOSE | 

| DVCDN | 

| DVCUP | 

| FREE | 

| HOLD | 

| LFCB | 

| LISTIO | 
| LUCB | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 


PS OM DM DS DS OG OS DS OM 


ms OO 


MTC 
PWR 
RESERV 
RESET 
ROD 
SETDF 
SETPRT 
UCS 
VOLUME 


6 OS 
os DX 


os PS 
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|and that the job step is to be executed. 
EXEC PROC|Calls a cataloged procedure and defines values for 


fo 
( JOB CONTROL STATEMENTS SUMMARY 
Lo a | 
ASSGN [Used at execution time to assign a specific device address | 
|to the symbolic unit name used. | 
CLOSE |Closes either a system or a programmer logical unit | 
|assigned to tape, disk, or diskette. 
DATE |Contains a date that is put in the communications region. | 
DLBL |Contains file label information for DASD or diskette label | 
|checking and creation. | 
EXEC |Indicates the end of job control statements for a job step | 
| 
| 
| 


|symbolic Parameters. 
EXTENT |Defines each area, or extent, of a DASD file or diskette 


| volume. | 
GOTO |Causes JC to skip all following statements (except JOB, | 
|/&, /+) up to the specified label statement. 
ID |Used to specify user identification and password. | 
Ek IF |Causes skipping or execution of the following statement | 
oi \ |dependent on the specified condition. 
JOB |Indicates the beginning of control information for a job.’ 


LIBDEF |Defines library chains. 

LIBDROP |Drops library chain definitions. 
LIBLIST |Lists library chain definitions. 
LISTIO |Used to get a listing of I/O assignments on SYSLOG or | 


{ 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| | SYSLST. | 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


MSECS |Changes or displays the time-slice for partition balancing. 

MTC |Controls operations on magnetic tapes. 

NPGR |Defines the number of programmer logical units which may | 
|be assigned to a partition. | 

ON |Causes specified action to be done if the specified con— 


|dition is true after any step in the following job stream. | 
OPTION |Specifies one or more of the job control options. 


OVEND |Indicates that no more overwrite statements will follow 
| for the respective procedure. | 
PAUSE [Causes a pause immediately after processing this | 
|statement, or at the end of the current job step. | 
PROC |Defines and initializes symbolic parameters in a procedure. | 
PWR |Passes a PRELEASE or PHOLD command to POWER. | 
RESET |Resets I/O assignments to the standard assignments. 


RSTRT |Restarts a checkpointed program. | 
SETPARM |Assigns a character string or return code to the | 
|specifeid parameter. 

SETPRT |Loads the IBM 3800 buffers. 

STDOPT |Resets system defaults. 


TLBL |Contains file label information for tape label checking | 
|and writing. 
* UPSI |(User Program Switch Indicators.) Allows the user to set | 
p |program switches that can be tested. 
ZONE |Initializes the zone field in the communications region. 
alee eee ___} 


be | Label statement. | 

| /* | Indicates the end of a data file. | 
ca {| /& | Indicates the end of a job. 

| * | Job control comments. | 

| /+ | Indicates the end of a procedure or librarian End-of—Data. | 
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JOB CONTROL COMMANDS AND STATEMENTS 


tp. oes ee et, ee ee ee 


| Operation | Operands | Type | 
| ALLOC | [space-id, ]part={nK|mM}{part={nK|mM}]... | JCC,AR | 
a ee ee es ere | Eee ee 
space-id Indicates in which address space the specified amount of storage 


for the named partition(s) is to be allocated. Valid 
specifications are: 


370 Mode: 

1, 2 or 3 In the specified virtual address space 

s In the shared virtual address space 

R In the real address space (processor storage). 


ECPS:VSE Mode or VM Mode: 


1 In virtual address space 
R In real address space. 
Note: 


* An ALLOC R command for a given partition can be given only 
after an ALLOC n for the same partition. 


. The default value of space~id for all modes is 1. 


part Indicates the partition to which storage is to be allocated. Valid 
specifications are: 


BG, F1..F9, FA, FB. 


Restriction If the system is generated with less than 12 
partitions, the number of foreground (Fn) partitions is reduced 
accordingly. For a 5-partition system, for example, valid 
specifications are BG and F1..F4. 

nK Specifies, in kilobytes, the amount of storage to be allocated. 
Valid specifications are 0 or an integer. Specifying 0 means that 
the entire storage allocated to the named partition is freed. The 
partition can no longer be used. 


The system rounds up the specified integer to a multiple of: 
. 64 in 370 mode for virtual address spaces; 

7 2 in 370 mode for real address space; 

: 2 in ECPS:VSE mode for real and virtual address space; 
° 4 in VM mode. 

The resulting rounded-up value must be at least 

e 2K in real address space allocations, and 

© 128K in virtual address space allocations. 

mM Specifies, in megabytes, the amount of storage to be allocated. 
Valid specifications are 0 or an integer. Specifying 0 means that 
the entire storage allocated to the named partition is freed. The 
partition can no longer be used. 


(> SE a ea pW ae ad 
| Operation | Operands | Type | 


| ALTER | [space-id, ]address | AR | 
See Sener ee CC ee ee a ee eran | 


space-id Specifies in which address space the alteration at the given 
address is to be made. Valid specifications are: 
° R, 1..3 in 370 mode; 
bs a in ECPS:VSE mode and VM mode. 
The default value for all modes is 1. 

address Indicates the six-digit hexadecimal address, with leading zeros if 
necessary, at which storage alteration is to start. ‘The highest 
address that can be specified is 16 MB minus 15 (FFFFFO). 
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If the specified address is within the supervisor area or the 
shared virtual area (SVA), a message is issued and the operator has 
the option to cancel the command or to change the address. 


If the specified address is within an invalid address range, the 
command is ignored and a corresponding information message issued, 


If the bytes to be altered cross the boundary from a valid to an 
invalid address space, the command is ignored and a corresponding 


- a information message is issued. 
i Se 
| Operation | Operands | Type | 
[//] ASSGN | SYSxxx, | Jcc, 
| {cuu| (address-list)|UA]IGN|SYSyyy | | Jcs 


device-class |device-type} 


bo ee | 


| Optional Operands for Disk Devices Only | 


_———$ 
| {,TEMP|,PERM][,VOL=volser][,SHR] | 
[$$ 


| Optional Operands for Diskette Devices Only | 


| 
| 
| 
| 
| 
| 
| 
| 
| 
Bete eenee eae 
| | [,TEMP|,PERM][,VOL=volser] | 
| SS ee | 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


| {,ss],ALT][,TEMP|,PERM] [,VOL=volser] | 
[a 


| Optional Operands for Device Types 2560 | 
[and 5424/5 


| 
| [,H1],H2][,TEMP| ,PERM] | 
[J $$ 


| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 
| Optional Operands for Tape Devices Only | | 
| 

| 

| 

| 

| 

| 

| 

| 

| Optional Operands for Any Other Devices | | 
| 


| {,TEMP| ,PERN] | 
nin eS} 


SYSxxx Represents the logical unit name. It can be one of the following: 
SYSRDR 
SYSIPT 
SYSIN 
SYSPCH 
SYSLST 
SYSOUT 
SYSLNK 
SYSLOG 


raed * Y 
— SYSnnn 


SYSnnn represents all the other logical units in the system. For 
nnn, specify a decimal number from 000 to 254. 


Restrictions: The type of device assignment is restricted under 
certain conditions: 
1. If one of the system logical units SYSRDR, SYSIPT, SYSLST or 
SYSPCH is assigned to a disk device or diskette, the 
foo™ assignment must be permanent and follow the DLBL and EXTENT 


iG ] statements. 
: aig 2. If SYSRDR and SYSIPT are to be assigned to the same disk 


device or diskette, SYSIN must instead be assigned and this 
assignment must be permanent. 

3. SYSOUT is only valid for a tape unit and must be assigned 
permanently. 

4. SYSLOG can only be assigned permanently. 

5. If SYSIPT is assigned to a tape unit, it should be a single 
file and a single volume. 


fEOEYs 6. You may not assign SYSLOG to a 3278 Model 2A or 3279 Model 2C 
: \ with a message area of 16 lines if IPL was done from a 3277, 
ta 3278 or 3279 with a message area of 20 lines. 
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cuu]X'cuu' 


(address-list) 


UA 


IGN 


SYSyyy 


device-class 


10. 


11. 


12. 


13. 


SYSLOG cannot be assigned to a console printer (3284, 3286, 
3287, 3288). 

ASSGN SYSLOG,UA and ASSGN SYSLOG,IGN are not accepted. 

If a system logical unit is assigned to a tape, DASD, or 
diskette, the unit must be closed (using the CLOSE command) 
before it can be reassigned. 

When SYSOUT is assigned to a magnetic tape device it must not 
be the permanent assignment of either SYSLST or SYSPCH. 
Before assigning a tape drive to a system output unit 
(SYSOUT, SYSLST, SYSPCH), all previous assignments of this 
tape drive to any system input units and to any programmer 
units (input or output) must be permanently unassigned. The 
assignment of SYSOUT must always be permanent. 

Also, before assigning a tape to a system input unit or any 
programmer unit, all previous assignments of this tape to any 
system output unit must be permanently unassigned. 

A programmer logical unit cannot be assigned to SYSLST if 
SYSLST has been assigned to tape or disk before. 

ASSGN SYSRDR and ASSGN SYSIPT are allowed within a cataloged 
procedure. SYSRDR assignments, and SYSIPT assignments in a 
procedure with a DATA=YES specification, become effective on 
returning to JC level 0. SYSIPT assignments in a procedure 
with DATA=NO specification become effective immediately. 

In a system with 16 channels, ASSGN SYSxxx,FBA cannot be used 
to address unit BA on channel F. Use ASSGN SYSxxx,X'FBA' to 
distinguish the cuu specification from the device class 
specification FBA (for Fixed Block Architecture). 


Indicates the physical unit address to which the specified 


logi 


The 


cal unit is to be assigned. 

c = channel number 

uu = unit number 

form X'cuu' must be used when the physical address of the 


specified device is FBA (that is, channel F, unit BA), to 


dist 


inguish it from the device class FBA (for Fixed Block 


Architecture disk unit). Otherwise, the X'' can be omitted. 


You 


can specify a list of up to seven device addresses in the 


form cuu, separated by commas and enclosed in parentheses. In 


this 


case the system searches only the addresses specified in the 


address list for a free unit, starting with the first specified 
device address. Once a free unit is found, it is assigned to 
SYSxxx for the job in which the assignment is made. 


For 


disks, if SHR is specified, the first unit in the list is 


assigned, even if previously assigned. 


Indi 


cates that the logical unit is to be unassigned. Any 


operation attempted on an unassigned device cancels the job. 


The 
PL/I 


IGN option is not valid for SYSRDR, SYSIPT, or SYSIN, nor for 
programs. The IGN option can be made temporary by 


specifying the TEMP option. 


This 
and 


may be any system or programmer logical unit, except SYSCAT 
SYSREC. 


In this case the specification of READER, PRINTER, PUNCH, TAPE, 
DISK, CKD, FBA, or DISKETTE is allowed for the devices listed 
below. 

READER 

1442N1, 2501, 2520B1, 2540R, 2560, 2596, 3505, 3525RP, 5425 
PRINTER 

PRT1, 1403, 1403U, 1443, 3203, 3800, 3800B, 3800C, 3800BC, 3200, 


4245 
PUN 


» 4248 
CH 


1442N1, 1442N2, 2520B1, 2520B2, 2520B3, 2540P, 2560, 2596, 3525P, 


3525 
TAP 
2400 


RP, 5425 
E 
T7, 2400T9, 8809, 3410T7, 3410T9, 3420T7, 3420T3, 3430 


DISK 


2311 


, 2314, 3330, 3330B, 3340, 3340R, 3350, FBA, 3375, 3380 


CKD 


2311 
FBA 


, 2314, 3330, 3330B, 3340, 3340R, 3350, 3375, 3380 


DISKETTE 


3540 
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device-type This can be any supported device as shown under the 


device-class specification, including the 8809. 


For a 3800 printing subsystem, you can use assignment by device 
codes as follows: 


| Specified code | is valid for | 


f ; | | 3800 | 3800B | 3800C | 3800BC | 
ww | 3800 a See ee ee 
| 38008 | i? | | X* | 
| 3800 | | | xX | Xe | 
|  3800BC | | | | X | 


* The job cannot use the additional character generation 


ss 


ALT 


storage feature. 
%#%%* The job cannot use the Burster-Trimmer-Stacker feature. 


Specifies mode settings for magnetic tapes. 
at IPL time, the system assumes: 


90 
co 
DO 
DO 
60 


If ss is not specified 


for 7-track tapes 
for 9-track tapes (2400, 3410 series) 
for 9-track tapes (3420 series) 
for 9-track tapes (3430 series) 
for the 9-track 8809 Magnetic Tape Unit 
Ce ee ent ee ms, fi a ee ay enews ot 
| Density [| Parity | Convert | Translate | ss | 
(bpi) Feature | | | 
; ——— = 
200 | odd | on | off | 10 | 
200 | odd | off | off | 30 | 
200 | odd | off | on | 38 | 
200 | even | off | off | 20 | 
200 | even | off | on | 28 | 
[$f 
556 | odd | on | off | 50 | 
556 { odd | off | off | 70 | 
556 | odd | off | on | 78 | 
556 | even | off | off | 60 | 
556 | even | off | on | 68 | 
+--+ 
800 | odd | on | off | 90 | 
800 | odd | off | off | BO | 
800 | odd | off | on | B8 | 
800 { even | off | off | Ao | 
800 | even | off | on | A& | 


| 800 | single-density 9-track tapes | cs | 

+— 
| 800 | dual-density 9-track tapes | cs | 
| 1600 | single or dual-density 9-track tapes | CO | 
| 6250 | single/dual density, 9-track | DO | 
| 1600 | Streaming: high speed and long gap | 90 | 
| D/T | Streaming: high speed and short gap | 30 | 
| 8809 | Start-Stop: low speed and long gap | 50 | 
| | Start-Stop: low speed and short gap | 60 | 


Indicates an alternate magnetic tape unit that is used when the 


capacity of the original assignment is reached. 


This operand can 


only be specified for programs using logical IOCS. 
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The specifications for the alternate unit are the same as those of 
the original unit. The characteristics of the alternate unit must 
be the same as those of the original unit. The original assignment 
and an alternate assignment must both be permanent or both be 
temporary assignments. Multiple alternates can be assigned to one 
symbolic unit. 


The ALT operand is invalid for SYSRDR, SYSIPT, SYSIN, SYSLNK, and 


SYSLOG. yi 
H1 Indicates that input hopper 1 will be used for input on the 2560, : 
5424, or 5425. If neither Hl nor H2 is specified, Hl is assumed. \ 
H2 Indicates that input hopper 2 will be used for input on the 2560, 
5424, or 5425. Note that hopper specifications are only valid with 
the logical units SYSIPT, SYSRDR, SYSIN, and SYSPCH. 
If both hoppers are used, they must be assigned to the same 
partition. 
PERM Indicates whether the assignment should be permanent (PERM) 
TEMP or temporary (TEMP). It is thus possible to override the // 
specification or omission. mn 
di 
A permanent assignment overrides the current assignment and deletes 
the stored permanent and all alternate assignments. 
VOL=no. Specifies the volume serial number of the device required. This 
option may be specified only for tapes, disks, and diskettes. 
SHR This option can be specified only for disk devices and is 
meaningful only in combination with address-list, device-class, and 
device-type. 
| Operation | Operands | Type | 
| BATCH | [BG|Fn] | AR | 
i 
The BATCH command (Start or Continue Processing) serves to activate or continue 
processing in one of the foreground partitions or in the background partition. 
BG Indicates that the background partition is to be reactivated. 
Fn Indicates that the specified foreground partition is to be 
activated or restarted after having been stopped by a STOP command. 
If the operand is omitted, BG is assumed. 
ns Se ae re rae | 
| Operation | Operands | Type | 
| CANCEL | blank , | sec | i 
i \ 
| CANCEL | cuu | AR | sx 
a 
| CANCEL | {BG|Fn}[,DUMP| ,PARTDUMP| ,NODUMP] | AR | 


| | [,SYSDUMP| ,NOSYSDUMP] [ ,FORCE] | | 
Ca: CON or eer ere 


The CANCEL command (Cancel Job), when issued as a JCC, cancels the execution of 
the current job in the partition in which the command is given. 

or 

when issued as an attention routine command, may 


° cancel an I/O request on a device for which operator intervention was 
requested. 

° cancel the execution of the current job in the specified partition and, 
optionally, to override the dump options existing for that partition. 


cuu Indicates that the I/O request for the specified device is to be 

canceled. 
BG Indicates that the background job is to be canceled. va 
Fn Indicates that the specified foreground job is to be canceled. 
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DUMP Causes a dump of the registers, of the supervisor, of the 
partition, the used part of the system GETVIS area, and of the 
SVA phase in error (if the error occurred in the SVA). 

PARTDUMP Causes a dump of the registers, of supervisor control blocks, of 
the partition, of areas acquired through GETVIS in the partition, 
and of the SVA phase in error (if the error occurred in the SVA). 


NODUMP Suppresses the DUMP option. 

NOSYSDUMP Indicates that dumps are to be written on SYSLST. The form 
}NOSYSDMP} is accepted for compatibility reasons. 

SYSDUMP Indicates that dumps are to be written to the dump sublibrary 


which is defined for the appropriate partition. If no LIBDEF DUMP 
statement is in effect for the partition in question, or if the 
defined sublibrary is full, the system assumes the option 
NOSYSDUMP. The form }SYSDMP} is accepted for compatibility 
reasons. 

FORCE Causes the Cancel command to be carried out immediately, even if 
a critical system function has requested a delay. 


[ ae) | 1 
| Operation | Operands | Type | 
= t | 
| [//] CLOSE | SYSxxx [,cuu[,ss]|,UA|, IGN] ,ALT| ,SYSyyy | 3cc,JCs | 
| | |,device-class| ,device-type] | | 
(ice | Pas J 


The CLOSE command (Close Output Unit) is used to close either a system or 
programmer logical unit assigned to a tape, or a system logical unit assigned to 
a disk or diskette. 


The CLOSE statement is used to close either a system or programmer logical unit 
assigned to tape. It applies only to temporarily assigned logical units. 


SYSxxx For the CLOSE command only: For disk or diskette: SYSIN, SYSRDR, 
SYSIPT, SYSPCH, or SYSLST. 


For both the statement and the command: For magnetic tape: SYSPCH, 
SYSLST, SYSOUT, or SYSOO0-SYS254. 


cuu Specifies that, after the logical unit is closed, it will be 
assigned to the specified channel and unit. 

ss Device specification for mode settings on 7-track and 9-track tape. 
The specifications are shown under ASSGN. 

UA Specifies that the logical unit is to be (permanently) unassigned 
after the file has been closed. 

IGN Specifies that the logical unit is to be (permanently) unassigned 


after the associated file has been closed. This operand is invalid 
for SYSRDR, SYSIPT, or SYSIN. 

ALT Specifies that the logical unit is to be closed and an alternate 
unit is to be opened and used. This operand is valid only for 
system output logical units (SYSPCH, SYSLST, or SYSOUT) currently 
assigned to a magnetic tape unit. 

SYSyyy Specifies that, after SYSxxx is closed, it will be assigned to the 
physical device to which SYSyyy is currently assigned (and to which 
it remains assigned). If SYSxxx is a system logical unit, it will 
be opened if the target device is a disk, diskette, or magnetic 
tape at load point, and if SYSxxx is not already assigned. 

device-class Indicates that after the logical unit is closed, it will be 
assigned to the first available unit within the specified device 
class, shown under ASSGN. 

device-type After the logical unit is closed, it will be assigned to the first 
free unit of the specified device type. Note that 8809 (not listed 
under TAPE) can also be specified as device type. 


T 1 


| Operation | Operands | Type | 

Snes Ga 
| // DATE | {mm/dd/yy |dd/mm/yy} | Jcs_ | 
(eed i \ a 


The DATE statement places the specified date temporarily in the communication 
region. This date overrides the date given in the SET command, either during or 
after IPL. The date from the DATE statement is reset at end of job to the date 
from the last SET command. 
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mm = month (01-12) 
dd = day (01-31) 
yy = year (00-99) ° 
r— ; a To 
| Operation Operands Type 
// DLBL filename, ['file-ID'], [date], [{codes][,DSF] 


[ ,BUFSP=n]} [ ,CAT=filename] [ ,BLKSIZE=n|MAX] 
[ ,CISIZE=n] [ ,DISP=disposition] [ ,RECORDS=n] 


| 
r =F 
| 
| [,RECSIZE=n] 


The DLBL statement (Disk label information) contains file label information for 
Disk or diskette label checking and creation. 


filename This can be from one to seven alphameric characters, the first 
of which must be alphabetic. This unique filename is identical 
to the symbolic name of the program DTF that identifies the 
file. 

"file-ID' This can be from one to 44 characters, contained within quotes. 
If this operand is omitted, filename is used. The diskette uses 
a maximum of eight characters in file-ID. 

date This can be from one to eight characters indicating either the 
retention period of the file in days (dddd=0-9999), or the 
absolute expiration date of the file as a Julian date in the 
format 19yy/ddd or 20yy/ddd. 


The format 20yy/ddd is not accepted for diskette files. 


Default is a 7-day retention period (based on the date entered 
via the SET* command). 
codes This is a two to four character field indicating the type of 
file label, as follows: 
sD for sequential disk or for DTFPH with MOUNTED=SINGLE 
DA for direct access or for DTFPH with MOUNTED=ALL 
DU for diskette 
ISc for indexed sequential using load create 
ISE for indexed sequential using load extension, add, or 
retrieve 
VSAM for all Virtual Storage Access Method files 
If this operand is omitted, SD is assumed. 


DSF This operand indicates that a data secured file is to be created 
or processed. 
BUFSP=n If a VSE/VSAM file is to be processed, this operand specifies 


the number of bytes of virtual storage (0-999999) to be 
allocated as buffer space for this file. 

CAT=filename This operand is only valid in a DLBL statement for a VSE/VSAM 
file. It specifies the filename (1 to 7 alphameric characters) 
of the DLBL statement for the catalog owning this VSE/VSAM file. 

BLKSIZE=n|MAX This operand permits specification of a block size different \ 
from that given in the DTFSD macro for sequential DASD files. oe 
The parameter is ignored for all DIF types except DIFSD. It is 
not valid for VSE/VSAM files, or files on FBA devices. The 
value specified for n must not exceed 65,536. 

If BLKSIZE=MAX, the system automatically takes a block size 
equivalent to one whole track of the device on which the file 


resides. 
CISIZE=n This operand permits specification of a control 
interval size for SAM files on FBA devices in order to improve f 


space utilization on such devices. The specified size must be a 
number from 512 to 32,768 and a multiple of the FBA block size. 
If it is greater than 8K, it must be a multiple of 2K. 
DISP=disposition This operand is valid only in a DLBL statement for a VSE/VSAM 

file. disposition can be specified in one of the following 
formats: 

NEW 

(NEW , KEEP) 

(NEW, DELETE) 

(NEW, DATE) 

OLD 

(OLD, KEEP) 
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(OLD, DELETE) 
(OLD , DATE) 
(, KEEP) 

(, DELETE) 

(, DATE) 

RECORDS=n This operand is only valid for VSE/VSAM space management for SAM 
feature files. The operand can be specified in one of two 
formats: 

RECORDS=n 

RECORDS=(n,n1) 
where n indicates the number of records for the primary data 
set allocation, and nl the number of records for the secondary 
data set allocation. nm must not be zero. 
The RECORDS and RECSIZE operands must either both be specified 
or both be omitted, 

RECSIZE=n This operand is valid only for VSE/VSAM space management for SAM 
feature files. It permits specification of the average record 
length of the file. The value specified for n must not be 
zero. The RECSIZE and RECORDS operands must either both be 
specified or both be omitted. 

oP arcs T 7 

Operation | Operands | Type | 

| 

| DSPLY | [space-id, ]address | AR | 

{ it ! J 


The DSPLY command (Display Virtual Storage) allows the operator to display 16 
bytes of virtual storage, starting at the specified hexadecimal address, on the 
device assigned to SYSLOG. 


space-id 


address 


Indicates in which address space the specified address is to be 
displayed. Valid specifications are: 

R, 1..3 in 370 mode; 

1 in ECPS:VSE and VN mode. 
To display virtual storage in a shared area (370 mode only) 
specify the space-id of any active virtual address space. 
Specifies the six-digit hexadecimal address, with leading zeros if 
necessary, at which the storage display is to start. The highest 
address that can be specified is 16MB minus 15 (FFFFFO). 


eae ti eet = dln are Se ye ee gall ry atl 


| Operation | Operands | Type | 
fe 

| DUMP | (SUP|BG|Fn|SVA|{space-id, ]addr-addr|BUFFER}, | AR | 
cuu | | 

l 4 i I 


The DUMP command allows the operator to dump specified areas of virtual storage 


on a printer or a tape device. 


The first operand specifies which areas of 


storage are to be dumped, as follows: 


SUP The control registers and the supervisor areas. 


BG, Fn 


The PSW, general and floating-point registers from the partition save 


area, and the active real or virtual partition specified. 
SVA The SVA, including the system GETVIS area and the VIO V-pool area. 


space-id 


Part of the address space specified by this operand. 


Valid 


specifications are: 


R, 1..3 for 370 mode; 


1 for ECPS:VSE and VM mode. 


The default value for all modes is 1. : 
addr-addr The virtual storage between the specified addresses in the address 


space indicated by the space-id operand. 
virtual partition, or a part of such a partition, 


If any active real or 
lies between the 


specified addresses, its PSW and associated registers are dumped. 


BUFFER 


The contents of the SDAID buffer. 


This operand is accepted only if 


the dump is directed to a tape device. 
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cuu Specifies the device on which the output is to be written. It can be 
a printer or tape device. For BUFFER only a tape unit address is 
accepted. Tape output is written without repositioning the tape to 
allow for several dumps per tape. 


Se =e 1 
| Operation | Operands | Dei 
| DVCDN | cuu | scc | 


a a ey) a EY er SNe EE PO EE Oe ee SE 


The DVCDN command (Device Down) informs the system that a device is no longer 
available for system operation. It is used when a device is to be serviced or 
becomes inoperative. 

A DVCUP command must be issued before the device can be'used again. 


Note: A DVCDN command is not accepted for a device on which SYSRES, SYSREC, 
SYSCAT, SYSDMP or the page data set resides. 


cuu c is the the channel number and Uu the unit number, in 
hexadecimal, of the device to be made unavailable. 


fA yo an ee ign = A al 

| Operation | Operands | Type | 
aor i 

| DVCUP | cuu | jcc | 

bz a ees soil IE } 


The DVCUP command (Device Up) informs the system that a device which was 
inoperative is now available again for system operation. As all assignments for 
this device were removed by the preceding DVCDN command, the device must be 
reassigned by an ASSGN statement or command. 


cuu c is the channel number and uu the unit number, in hexadecimal, of 
the device to be made available. 


fietowe Ree eS ne ee! Se a 7 
| Operation | Operands | Type | 
i ae ae 
| [//] EXEC | [[{PGM=]progname]{,REAL][,SIZE=size}][,GO] | JCS,Jcc | 
| | [,PARM='value'] | | 
+ 4+ 
| {//] EXEC | PROC=procname [,parname[=[value]]][..-.] | Jec,Jcs | 
| 
| {//] EXEC | PROC=procname[ , OV] | Jes,jcc | 
L | i | 


The EXEC command or statement (Execute Program or Procedure) indicates either 


* the end of control information for a job step and the beginning of execution 
of a program. 

. that a cataloged procedure is to be retrieved from a sublibrary by job 
control. 


The operands must be entered in the specified order. 

The statement can be issued from SYSLOG or from SYSRDR. Control will return to 
the unit from which the statement was issued. If specified with a procedure 
name, control will always return to SYSRDR. The command can be issued only 
from SYSLOG and control will return there. 


Continuation lines are accepted for the EXEC statement. 


PGM=progname Represents the name of the program to be executed. The program 
name corresponds to the first or only phase of the program in the 


library. 

REAL Indicates that the program will be executed in real mode. If 
REAL is not specified, the program is always executed in virtual 
mode. 

SIZE=size The SIZE parameter can be specified in combination with REAL or 


without REAL. The SIZE parameter can be specified in the 
following formats: 
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GO 


PARM='value' 


PROC=procname 


SIZE= nK|mM 

SIZE=AUTO 

SIZE=(AUTO, nK|mM ) 

SIZE=phasename 

SIZE=(phasename, nK|mM ) 
where nN or m must be greater than zero and n must be a multiple 
of 4 (if not, the system rounds the value up to the nearest 4K 
boundary). mK or mM must not exceed the size of the partition 
(as defined by ALLOC) minus the minimum partition GETVIS area of 
48K bytes. 


AUTO indicates that the program size, as calculated by the 
system from information in the sublibrary directory, is to be 
taken as the value for SIZE. 


AUTO, nK|mM_ indicates that job control must take the program 
size plus nK or mM bytes as the value for SIZE. 


phasename indicates that the length of the specified phase, 
increased by its relative load address in the partition, is to be 
taken as the value for SIZE, regardless of other phases with the 
same first four characters in their names. 


phasename,(nK|mM) indicates that the length of the specified 
phase, increased by its relative load address in the partition, 
plus nK or mM bytes, is to be taken as the value for SIZE. If 
this value is not a multiple of two, it is rounded up. 

Specifies, for a language translator step, that the program is to 
be link-edited and executed automatically after it has been 
compiled. 

Specifies information which is to be passed to the program at 
execution. value can be up to 100 characters in length, enclosed 
in quotes. (The enclosing quotes are not passed to the program.) 
An quote within value must be coded as two single quotes. 
Represents the name of the procedure to be retrieved from a 
sublibrary. 


If the procedure name begins with $$, the system substitutes a 
partition-related character for the second $. The character that 
is substituted is related to the partition in which the procedure 
is invoked, that is, 


for the BG partition 
for the FB partition 
for the FA partition 
for the F9 partition 


OPrwo 


1 for the Fl partition. 


The procedure corresponding to this name is then retrieved for 
execution. There are three methods of addressing symbolic 
parameters in the EXEC PROC statement or command: 


parnamel=valuel 
parname2 
parname3=&parname3 


parnamel Specifies the name of a symbolic parameter which is 
to be substituted in the specified procedure. It 
must consist of 1 to 7 alphanumeric (including 
national) characters, and the first character must 
be alphabetic. 

valuel Specifies the actual value which is to be inserted 
in the specified procedure in place of the specified 
symbolic parameter. It must be a string of up to 50 
characters. If the string is alphanumeric, no 
enclosing quotes are necessary. If it contains 
national or special characters, it must be enclosed 
in quotes, which will not be passed to the 
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procedure. No quotes are allowed in the string 


itself. 
parname2 Is the name of a symbolic parameter which is to be 
passed to a lower-level procedure and back. 
parname3 Is the name of a symbolic parameter which is to be 


passed to a lower-level procedure. The symbolic 
parameter name after the equals sign must be coded 
with the ampersand (&). 


Indicates that overriding statements follow EXEC. This operand 
must not be used when the called procedure contains symbolic 
parameters or calls a nested procedure, or if it contains IF, ON, 
GOTO or SETPARM statements. 


[oe emp he ge ee ee ee ee ee ee ee ee ON eae ye ee 


| Operation | Operands | Type 
[logical-unit], Jcs 


| | 
| [serial-number],[type], 

| [sequence-number], | 
| [relative-track|block], 

| [number~of-tracks|blocks], | 
| [split-cylinder-track] 


The EXTENT statement (DASD Extent Information) defines each area, or extent, of 
a DASD file. 


logical unit A six-character field indicating the logical unit (SYSxxx) 


of the volume for which this extent is effective. 


This operand is not required if a system file with IJSYSxx 
as filename is specified. 


serial number From one to six characters indicating the volume serial 


type 


number of the volume for which this extent is effective. If 
fewer than six characters are used, the field is padded on 
the left with zeros, unless you enclose it in quotes, in 
which case it is padded on the right with blank characters. 


One character indicating the type of the extent, as follows: 
1 - data area 

2 - independent overflow area 

4 - index area 

8 - data area 

If this operand is omitted, type 1 is assumed. Type 1 is 
the only valid parameter for diskette files. 


sequence number One to three characters containing a decimal number 0 to 255 


indicating the sequence number of this extent within a 
multi-extent file. 


relative track|block For CKD devices, this operand is one to five characters 


indicating the sequential number of the track, relative to 
zero, where the data extent is to begin. 


For FBA devices, this operand is a number from 2 to 
2,147,483,645 which specifies the physical block at which 
the extent is to start. 


For VSE/VSAM, this operand must be specified when a data 
space or a file with the UNIQUE option is being created. 


number of For CKD devices, this operand is one to five characters 
tracks |blocks indicating the number of tracks to be allocated to the file. 


For FBA devices, this operand is a number from 1 to 
2,147,483,645 which specifies the number of physical blocks 
in the extent. 


split cylinder track A one or two-digit decimal number, indicating the upper 
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ae 

| Operation | Operands | Type | 
{ 

| FREE | cuu | AR | 


ie a ee ee ee 


The FREE command is used to reset the RESERVED status (as caused by the RESERV 
command) of the specified device. The command may be issued for ali DASD 
devices on the system. 


cuu Indicates the channel and unit number of the device to be freed. 
[ T 7 1 
| Operation | Operands | Type | 
| {//] GOTO | label | sJcc,scs | 


I eer eee eo tt ee TER Or nr OSES ee ee Re 


The GOTO statement causes all statements in the following job stream to be 
skipped, up to the specified label statement. It is accepted only within a job. 


label Specifies the operand of the /. statement at which execution of the 
current job is to continue. Code SEOJ to skip all statements up to 
end-of-job. 

f T Foe a oe el 

| Operation | Operands | Type | 

— —+- 

| HOLD | Fn[,Fn]... | Jcc 


The HOLD command is used to hold assignments or sublibrary definitions made via 
LIBDEF before you issue a command to unbatch a foreground partition. The 
partitions may be specified in any sequence; at least one partition must be 
given. nm indicates the desired partition. 


[fp seg a a ig ham ee ee eS GE Oa ap 


| Operation | Operands | Type | 
| {//] ID | USER=user-id, PWD=password | Jcs,Jcc | 
[Ea A Oa ene a SR a ee! (eee eA 


The ID statement or command is used to specify the user identification and the 
user's password. 


user-id Specifies the user identifier, which must be four alphameric 
characters. 
password Specifies the password of the user, which can be three to six 


alphameric characters. 


| Operation | Operands | Type | 
| {//] IF | {SRC comparator n } [OR ] THEN | JcC,Jcs | 
| | {SMRC comparator n } [| 4 | 
| | {pname comparator value} [AND ...] | 
| | [& ] | | 
| RCS a ee ee FS | See a | 


The IF statement is a local conditional function. When it occurs in the job 
stream, the condition is checked; if it is true, the following statement is 
executed; if not, the following statement is skipped. 


$RC Specifies the return code of the preceding job step. 
SMRCG Specifies the maximum return code of all preceding steps within 
the current job. 
pname Specifies the name of a parameter to be compared. 
comparator Specifies the comparison to be done. 
Equal specified as = or EQ 
Not equal specified as 7= or NE 
Greater than specified as > or GT 
Less than specified as < or LT 
Greater or equal specified as >= or GE 
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Less or equal specified as <= or LE 

n specifies a decimal integer from 0 to 4095. 

value specifies a character string of 0 to 50 characters. If the 
string contains special characters, it must be enclosed in 
quotes. 


You can specify two conditions in the IF statement, separated by one of the 
logical operators OR, [, AND, &. The logical operators OR, |, AND, & must be 
preceded and followed by a blank character. 


See ee ee bn a 
| Operation | Operands | Type | f \ 
| IGNORE | none | Scc,aR | 


a ee eS 


On an abnormal condition, the operator will be notified by an appropriate 
message on SYSLOG. Depending on the situation, he may have to ignore the 
condition by entering an IGNORE command without any operand. 


r T as 2 
! Operation | Operands | Type 
| 


|— 


// JOB | jobname [accounting information] | Jcs 
1 


bea ted 


The JOB statement indicates the beginning of control information for a job. 


jobname The name of the job. Must be one to eight alphameric characters 
(0-9, A-Z, #, $, @) or /, -, oF ae 

accounting If the job accounting interface has been 

information specified during system generation, max. 16 characters of user 
information are moved to the job accounting table. 


i i ae TT 1 
| Operation | Operands | Type 

| 4 
| LFCB | cuu,phasename[ ,FORMS=xxxx][,LPI=n]{,NULMSG[ AR 

L aN i 


The LFCB command causes the system to load a buffer image, stored as a phase, 
into the forms control buffer (FCB) of the specified printer. 


cuu Specifies the channel and unit number of the printer whose FCB is 
to be loaded. 
phasename Specifies the name of the phase that contains the applicable buffer 


load image. 
FORMS=xxxx Specifies the installation-defined forms number xxxx of the paper 
that is to be used with the new FCB image. 


LPI=n Indicates (for a printer other than a PRT1) the required setting of 
the carriage clutch. For n, you can either substitute 6 (six lines ee 
per inch) or 8 (eight lines per inch). i 
NULMSG Specifies that the printing of a buffer load verification message \ 
is to be suppressed. , 
i raat T —7 
| Operation | Operands | Type 
sa 1 
| [//] LIBDEF | {type|*} [,SEARCH=(lib.sublib,...)] | Jcc,Jcs | 
| | [,CATALOG=lib.sublib] [{, TEMP |PERM}] | | 
The LIBDEF statement defines which sublibraries are to be searched for members 
of a specified type or types, or the sublibrary in which new phases or dumps are 
to be stored. 
The system sublibrary IJSYSRS.SYSLIB is always added at the end of the search 
chain, unless it is explicitly included at a different position in the chain. 
type Defines the member types for which this LIBDEF statement 
applies. For type, specify: 


PHASE To define a library/sublibrary chain to be used for po 
loading or fetching program phases for execution. The 
CATALOG operand specifies the library and sublibrary 
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in which phases are to be cataloged by the linkage 
editor. 

OBJ To define a library/sublibrary chain to be used by the 

linkage editor when searching for object modules. 

SOURCE To define a library/sublibrary chain to be used, for 

example by language translators, when searching for 
one of the predefined }SOURCE} types (A-Z, 0-9, #, $, 
@). 

PROC To define a library/sublibrary chain to be used by Job 

Control when searching for a procedure to be executed, 

To indicate that the LIBDEF statement applies to all 

member types except DUMP and user types. 

DUMP To define a library/sublibrary to be used by the 
system when a dump is to be produced and the option 
SYSDUMP is in effect, or a CANCEL command with the 
SYSDUMP operand is issued. You must use the keyword 
CATALOG if you specify DUMP as the type operand. 

SEARCH=lib,.sublib Is required if you specified OBJ, SOURCE or PROC in the type 
operand. With type PHASE, or * you must specify SEARCH or 
CATALOG or both. 

CATALOG=lib.sublib Is applicable for LIBDEF statements with the type PHASE, DUMP 
or * only. It specifies the library/sublibrary into which the 
linkage editor or DUMP output is to be cataloged. There is no 
system default. 

TEMP | PERM Specify the duration of the definition given in the statement. 


ob 


Phase Chaining 


The search chain for phases includes the system directory list (SDL), and is 
different for "$" and "non-$" phases, as follows: 


for "non-$" phases: SDL ~- TEMP chain -- PERM chain -- IJSYSRS.SYSLIB. 
* for "S$" phases: SDL -- IJSYSRS.SYSLIB -- TEMP chain -- PERM chain. 


SSS I 
| Operation | Operands ‘ | Type | 


SS SS SS Se 
| [//] LIBDROP | {type]*}{,SEARCH][,CATALOG][{,TEMP|PERM}] | JCC,JcS | 
Ni nt 


The LIBDROP statement resets the library search and catalog definitions set up 
by one or more previous LISDEF statements. 


type Specifies the member type for which the search and catalog 
definitions are to be reset. 

* Specifies all types except DUMP. 

SEARCH Specifies that only the search chain is to be dropped. 


CATALOG Specifies that only the sublibrary defined in the CATALOG operand 
of a previous LIBDEF statement is to be dropped. 
TEMP | PERN Specify whether the TEMP or PERM definition is to be dropped. The 


system default is TEMP. 


ot : aman ere 1 
| Operation | Operands | Type | 
f + = rea 
| {//] LIBLIST | {type|*}[,BG|Fn|*][,SYSLST| SYSLOG] | g3cc,scs | 
bos ht. Ai a) 


The LIBLIST statement causes the library definitions set up with the LIBDEF 
statement to be displayed on SYSIOG or SYSLST. 


type Specifies the member type for which the library definitions are 
to be displayed. 


Causes the library definitions of all LIBDEF statements to be 
displayed, except DUMP. 
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BG|Fn|* Specify the partition for which the current library definitions 
are to be displayed. * means all partitions. If the partition 


operand is omitted, the partition in which the command itself is 
processed, is assumed. 


SYSLST|SYSLOG Specify the output device to be used for displaying the library 


definitions. 
| Operation | Operands | Type | 
| [//] LISTIO | listtype | Jcs,Jcc | 


The LISTIO command or statement (list I/0 assignment) causes the system to print 
a listing of I/0 assignments. 


listtype can be one of the following: 


ALL Lists the physical units assigned to all logical units 

ASSGN Lists the physical units assigned to all system and programmer 
logical units of the partition from which the command is issued. 

BG Lists the physical units assigned to all logical units of the 
background partition. 

cuu Lists the logical units assigned to the specified physical unit. 

DOWN Lists all physical units specified as inoperative. 

Fn Lists the physical units assigned to all logical units of the 
specified foreground partition. 

NPGR Lists the number of programmer logical units allocated to each 
partition. 

PROG Lists the physical units assigned to all programmer logical units 
of the partition from which the command is issued. 

SYS Lists the physical units assigned to all system logical units of 
the partition from which the command is issued. 

SYSxxx Lists the physical units assigned to the specified logical unit of 
the partition from which the command is issued. 

UA Lists all physical units not currently assigned to a logical unit. 

UNITS Lists the logical units assigned to all physical units. 

fe eee et IN eee Ne eS SV ed 

| Operation | Operands © | Type | 

| LOG | none | JCC,AR | 

—— eee a | 


The LOG command causes logging of job control commands and statements on SYSLOG 
for that partition, where the command has been issued. (effective until NOLOG 
command) The AR LOG affects all partitions. 

The LOG command suppresses OPTION ACANCEL. 


| Operation | Operands | Type | 
! aio 
| LUCB | cuu,phasename[ ,FOLD] [ ,NOCHK] | AR 

| | | 


[ , TRAIN=xxxxxx ] [ ,NULMSG] 


The LUCB command causes the system to load the buffer image, contained in the 
named phase, into the universal character set buffer (UCB) of the specified 
printer. 


cuu Channel and unit number of the printer whose UCB is to be loaded. 

phasename Name of the phase which contains the applicable buffer load image. 

FOLD Causes lower case characters to be printed as upper case 
characters. 

NOCHK Suppresses data checks from mismatches between printline characters 
and the UCB. 


TRAIN=xxxxxx Indicates that the print train identified by xxxxxx is to be 
mounted on the printer. 
NULMSG Suppresses printing of buffer load verification message. 
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| Operation | Operands | Type | 
| MAP | none | JCC,AR | 
The MAP command produces, on SYSLOG, a map of all storage areas in the system, 


with their sizes and starting addresses. 


| Operation | Operands Type 


| 

{ 
| {IR | AR 
| CR] | 
| Tinea: a cae Gas | 

R 

| STATUS | | 
| HIR{[,R|,Q][,E=eeee][,T=tttt]}| | 
| BGGCsM| EYRE Ol TH seresse| isi =eett |, | 


Cn ee cee ee ne een nce ee abe ene 


Rt ae , The MODE command allows you to alter the recording mode. 


In a VM/370 environment the R, HIR, and ECC operands are not accepted (Message 
1I94I COMMAND IGNORED IN VM/370 ENVIRONMENT) VM/370 ENVIRONMENT to be issued. 


For 4300 Processors, only operands IR, CR, and CE are valid. 
For Models 135/138, the only valid MODE commands are: 


MODE CE,... 
MODE STATUS 
MODE ECC,Q 
MODE ECC,R 


The meanings of the operands are: 


IR|CR Recording mode for nonstandard labeled and unlabeled tape. (IR) 
Individual Recording for recording and then resetting the tape 
error statistics at each tape OPEN. (CR) Combined Recording for 
accumulating all statistics from nonstandard labeled and unlabeled 
tape on a specific tape unit until a standard labeled tape is 
opened. 


CE, cuu The recording mode for device cuu may be reset. The possible 
recording modes are: 


Normal. The default, normal, is assumed. 
| Intensive. Normal recording continues. 


ae D Diagnostic. Normal recording continues. 
rd N No recording. 

STATUS A report is printed on SYSLOG. 

HIR Hardware Instruction Retry. 

ECC Error Correction Code. 

R Recording Mode 


MODE R - places both HIR and ECC in recording mode. 
MODE HIR,R - places HIR in recording mode. 


MODE ECC,R (Models 155-II/158, and 3031) places ECC in recording 
mode. (if HIR is in recording mode) 


MODE ECC,M,R (Models 145/148) places processor storage in recording 
mode. (if HIR is in recording mode) 


MODE ECC,C,R (Models 145/148) places control storage in recording 
mode. (if HIR is in recording mode) 


\ Q Quiet Mode 


a MODE HIR,Q - places both HIR and ECC in quiet mode. 
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MODE ECC,Q (Models 135/136, 155-II/158, and 3031) - places ECC in 
quiet mode. 


MODE ECC,M,Q (Models 145/148) - places real storage in quiet mode. 


MODE ECC,C,Q (Models 145/148) ~ places control storage in quiet 


mode. 
M or C (only valid for Models 145/148) : 
M indicates real storage and C control storage. f Ps 
TH Threshold Mode: (only valid for Models 145/148) Control storage is _ 7 
placed in quiet mode on next ECC control storage error. If TH is : 
specified, T = tttt must also be specified. 
E=eeee E: 8 (IBM-supplied value) through 9999 
T=tttt T: 8 (IBM-supplied value) through 9999 
| Operation | Operands | Type | : 
| MSECS | fn] | Jcc,AR | 
The MSECS command displays or changes the time slice for partition balancing. 
n time slice in milliseconds (100 to 10000) 
If n is omitted, the system displays the current time slice in 
milliseconds. 
[ra oe eo es ee ee ee ee et Oe ee 
| Operation | Operands | Type | 
| MSG | {BG|Fn} | AR | 
fa Ss ES 
The MSG command transfers control to an operator communications routine for 
which linkage has been established via a STXIT macro. 
BG Communication with background partition is desired. 
Fn Indicates the desired foreground partition. 
| Operation | Operands | Type | 
| {//] MTC | opcode, {cuu|SYSxxx}[,nn] | Jcc,Jcs | 
eh a ee 
The MTC command or statement controls magnetic tape operations. ge 
fo 4 
f 
opcode Specifies the operation to be performed. : 
BSF Backspace File My 


BSR Backspace Record 

DSE Data Security Erase (3400 only) 
ERG Erase Gap 

FSF Forward Space File 

FSR Forward Space Record 

REW Rewind 

RUN Rewind and Unload 

WIM Write Tape Mark 


SYSxxx Logical unit to which the tape is assigned. z 
cuu Channel and unit number. 
nn Decimal number (1 through 99) of times. 


The default is 1. 


| Operation | Operands | Type | 
Se See 
| NEWVOL | [BG|Fn][, IGNORE] | AR | 
Le a a ee a 


Indicates that a new volume has to be mounted for the specified partition. 
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BG{Fn Indicates the partition for which the new volume was mounted. If 
no operand is specified, BG is assumed. 

IGNORE Specifies that the mount request is to be ignored. 

a ary Nee | } 

| Operation | Operands | Type | 

+— 
| NOLOG | none | JCc,AR | 
| cares ee | a Fs oe 


The NOLOG command (suppress logging) terminates the listing, on SYSLOG, of job 
control commands and statements (except ALLOC, ALLOCR, DVCUP, HOLD, IGNORE, JOB, 
MAP, PAUSE, PRTY, SIZE, STOP, UNBATCH /*, /& and /+) that occur in the partition 
in which the NOLOG is issued. 


7 | Te 71 
| Operation | Operands | Type | 
f =I 7 { 
| NPGR | [BG=m][,Fn=m] | scc | 
(ae, aie Les J 


The NPGR command defines the number of programmer logical units which may be 
allocated in a given partition. 


BG|Fn Partition for which the number (m) of programmer logical units to 
be allocated. 
m Decimal number from 10 through 255. 


30 programmer logical units per partition is the default. 


Font Gee jo es Mid ae a a we ee Pe ee ee ye oo 


| Operation | Operands | Type | 
| {//] ON | {SRC comparator n} [ OR ...] {GOTO label}| Jcc,Jcs | 
| | {SCANCEL }{ | ...] {CONTinue }| | 
| | {SABEND } [ AND ...] | | 
| | f& ...] | | 


The ON statement is a global conditional function. During execution of a job in 
which an ON statement occurs, the specified condition is tested at the end of 
each job step following the ON statement. If the condition is true, the 
specified action is taken, otherwise processing continues with the next 
statement. 


$RC Specifies the return code of the preceding step. 

comparator Specifies a comparison to be done. This can be one of the 
following six possibilities: 
Equal specified as = or EQ 
Not equal specified as = or NE 
Greater than specified as > or GT 
Less than specified as < or LT 
Greater or equal specified as >= or GE 
Less or equal specified as <= or LE 

n A decimal integer from 0 to 4095, to be used for comparison with 
the return codes. 

$SCANCEL Specifies that the action is to be taken if the CANCEL command is 
given for the job. 

SABEND Action is to be taken if the step terminates abnormally. 

GOTO label Label where processing is to continue. 

CONTINUE Processing should continue if the specified condition is true. 


The following are default ON-conditions. 
ON $RC<16 CONTINUE ON S$RC>=16 GOTO SEOJ ON SABEND GOTO SEOJ ON SCANCEL GOTO SEOJ 


f ap ir 
| Operation | Operands | Type | 
| ONLINE | cuu | AR | 
[cee eee 5 a -_ 


The ONLINE command is used to simulate a ‘device ready’ status for a device. 
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cuu Channel and unit number, in hex, of the particular device. 
r fo T —j 
| Operation | Operands | Type | 
|— +} 
| // OPTION | option [,option]... | Jcs | 
i. aneen) RECs Ceres | 


The OPTION statement specifies one or more job control options which temporarily 
override the system defaults. 


The options, which can appear in any order, are as follows: 


ACANCEL 


NOACANCEL 


ALIGN 


NOALIGN 
CATAL 


DECK 


NODECK 
DUMP 


PARTDUMP 
NODUMP 
EDECK 


NOEDECK 
ERRS 


NOERRS 
JCANCEL 
NOJCANCEL 
LINK 
NOLINK 
LIST 


NOLIST 
LISTX 


NOLISTX 


LOG 


NOLOG 


LOGSRC 


NOLOGSRC 


PARSTD 


PARSTD=ADD 


PARSTD=DELETE 


PARSTD=Fn 


The job must be canceled if an attempt to assign a device is 
unsuccessful. 

The system awaits operator intervention in the case of an 
unsuccessful assignment. 

The assembler aligns constants and data areas on proper 
boundaries. 

Suppresses the ALIGN option. 

A phase or program is permanently cataloged in a library at the 
completion of a link-edit run. CATAL also sets the LINK option. 
Language translators produce object modules on SYSPCH. 
Suppresses the DECK option. 

Dumps the registers, supervisor area, partition, the used part 
of the system GETVIS area, the SVA phase in error (if the error 
occurred in the SVA), and the phase load list. 

Dumps selected areas of storage. 

Suppresses the DUMP or PARTDUMP option. 

The assembler punches all valid source macro definitions in 
edited format on SYSPCH. 

Suppresses the EDECK option. 

The FORTRAN, DOS/VS COBOL, and PL/I compilers summarize all 
errors in the source program on SYSLST. 

Suppresses the ERRS option. 

System should skip to End-of-Job if a job control error occurs. 
Suppresses the JCANCEL option, and is the system default. 
Indicates that the object module is to be link-edited. When the 
LINK option is used. 

Suppresses the LINK option. 

Language translators write the source module listing on SYSLST. 
Suppresses the LIST option. 

The COBOL compiler produces a PROCEDURE DIVISION map on SYSLST. 
The PL/I and FORTRAN compilers produce the object modules on 
SYSLST. 

Suppresses the LISTX option. 

Lists columns 1-80 of all control statements and commands on 
SYSLST. 

Suppresses the listing of all valid control statements and 
commands on SYSLST until a LOG option is encountered. 

This operand causes JC statements which contain symbolic 
parameters to be printed twice, once in source form (as coded), 
once with substituted symbolic parameters (as processed by job 
control.) 

Suppresses LOGSRC, and is the system default. JC statements will 
be printed only once showing the substitution of the symbolic 
parameters, if any. 

All disk, diskette, and tape label statements are written into 
the partition standard subarea of the system's label information 
area. 

All label information will be stored permanently into the 
partition standard subarea of the label information area without 
overwriting existing information. 

This option must be followed by the filename(s) of the DLBL 
statement(s) to be deleted from the partition standard subarea 
of the label information area. The last (or only) filename must 
be followed by /*. PARSTD (or STDLABEL)=DELETE must be the last 
option of the OPTION statement. 

All label information will be stored permanently into the 
specified partitions standard subarea of the label information 
area. The option can only be submitted in the background, and 
the partition specified by Fn must be inactive. 
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RLD The assembler writes the relocation list dictionary on SYSLST. 
This option is suppressed if NOLIST is specified. 

NORLD Suppresses the RLD option. 

STDLABEL All disk, diskette, and tape labels are written into the system 


standard subarea of the label information area, to be available 
to all subsequent jobs in all partitions until another STDLABEL 
option without operand or with =DELETE is submitted. 

STDLABEL=ADD All label information will be stored permanently into the system 
standard subarea of the label information area without 
overwriting existing information. 

STDLABEL=DELETE This option must be followed by the filename(s) of the DLBL 
statement(s) to be deleted from the system standard subarea of 
the label information area. STDLABEL (or PARSTD) with =DELETE 
must be specified as the last option of the OPTION statement. 

SUBLIB=DF Directs the assembler and ESERV program to retrieve non-edited 
macros and copy~books from sublibrary members of type D instead 
of from sublibrary members of type A, and to retrieve edited 
macros from sublibrary or type F instead of from sublibrary 
members of type E. 

SUBLIB=AE Redirects the assembler and the ESERV program to retrieve 
non-edited macros and copy books from sublibrary members of type 
A and to retrieve edited macros from sublibrary members of type 


E. 

SYM The COBOL compiler produces a DATA DIVISION map on SYSLST; the 
PL/I compiler produces the symbol table on SYSLST. 

NOSYM Suppresses the SYM option. 

SYSDUMP Indicates that dumps are to be written to the dump sublibrary 


which is active for the partition. The old form of this operand 
(SYSDMP) is accepted for compatibility reasons. 


NOSYSDUMP Indicates that dumps are to be written on SYSLST. The old form 
of this operand (NOSYSDMP) is accepted for compatibility 
reasons. 

SYSPARM='string' Specifies a value for the assembler system variable symbol 
&SYSPARM. 

TERM Error messages are written on SYSLOG (applies only to compilers 
that support this function). 

NOTERM Suppresses the TERM option. 

USRLABEL ALL disk, diskette, and tape labels are written temporarily (for 


one job or job step) into the partition temporary sub-area of 
the label information area. 


XREF The assembler writes the symbol cross-reference list on SYSLST. 

SXREF The assembler writes the symbol cross-reference list on SYSLST; 
printing of all unreferenced labels is suppressed. 

NOXREF Suppresses the XREF or SXREF option. 

NOFASTTR Suppresses fast CCW translation for the current job. (Note that 
FASTTR is a system generation option only.) 

48C Specifies the 48-character set on SYSIPT (for PL/I). 

60C Specifies the 60-character set on SYSIPT (for PL/I). 

{ T Ine 1 

| Operation | Operands | Type | 

[re ma i { 

{//] OVEND | [comment ] | JCS,Jcc | 
l | 


The OVEND (Override End) statement or command indicates the end overriding 
statements for cataloged procedures. The OVEND statement has no operand. 


a ee ee ee 
| Operation | Operands | Type | 


| [//] PAUSE | [any user comment] | Jcs,Jcc | 
ee 


| PAUSE | [BG|Fn][,E0J] | AR | 
= al. st j 


The PAUSE statement causes a pause immediately after processing this statement. 
The PAUSE command causes a pause at the end of the current job step. 
The PAUSE statement or command always appears on SYSLOG. If SYSLOG is assigned 


to a line printer, the PAUSE statement or command is ignored. 
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BG or Fn Indicates the partition in which processing is to be interrupted. 
EOS Indicates that the interruption will occur at the end of the 
current job. 


oS er ol 
| Operation | Operands | Type | 
Ciena 

| {//] PROC | [parname=[value]][,..-] | Jcs,Jcc | 
Sh 


The PROC command or statement, when used, is the first line of a cataloged 
procedure. It is required only when the procedure contains symbolic parameters 
to which you want to assign initial values. 


parname The name of the symbolic parameter (without a leading &) to which 
you want to assign the specified value. 
value The value you want to assign to the specified symbolic parameter. 
i a [ a’ 
| Operation | Operands | Type | 
+ 
| PRTY | none | AR 
a 
partition,partition| ,partition]}... »JCC 
| PRTY | iti iti iti AR, JC 
f 
| PRTY | partition=partition[=partition]... | AR,Jcc | 
= oan me ae J 


The AR PRTY (priority) command allows the operator to display or change the 
priority sequence of partitions in the system. In both cases also the current 
status (if active) of the TP Balancing (TPBAL) function is displayed. 


The JCC PRTY command can be used only in the BG during ASI (Automated System 
Initialization) to modify the priority sequence of the partitions in the system. 


The AR PRTY command without operands displays, on SYSLOG, the current priorities 
of all partitions. 


The operands can be specified in two forms, as shown, or in a mixed form, to 
provide for priority setting and partition balancing together. 


partition,partition,partition ... 
specifies the desired sequence of processing priority. 
partition=partition=partition .:. 
specifies that dynamic partition balancing is to be used for the 
partitions which you list with a separating equals sign(=). 
Mixed format: Specifies a desired sequence and in addition partition balancing. 
example: PRTY BG,F1=F2=F3=F4 ,F5,F6 


a —T an at 

Operation | Operands | Type | 
- | 
| {//] PWR | {PRELEASE...|PHOLD...} | Jcs,Jcc | 
(a ea 2 xihe ] 


The PWR job control statement makes it possible to pass the commands PRELEASE 
and PHOLD to POWER at any point in the job stream. The operand of the PWR 
statement is taken as a POWER command, and its syntax is checked by the POWER 
routine. 


PWR specifies that the rest of the statement is a POWER command. 
PRELEASE|PHOLD are the POWER commands which will be accepted. 


a ; 
| Operation | Operands | Type z 
| RC | none | AR | 
L_ wes eS See) 


With asynchronous operator communication, the operator can use the RC (Request 
Communication) command to enter an AR command when the attention routine is not 
available (the attention routine identifier AR does not appear). 
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ae a ae a 
haloes ae Se | 
| REPLID | none | AR | 
L i —I 


The REPLID command displays the reply-IDs (and partition indicators) of all 
messages for which replies are still pending. 


| Operation | Operands | Type | 


| RESERV | cuu | AR | 
ee | ee eae 


The RESERV command reserves a device for VSAM space management usage. The 
reserved status can be reset only by a FREE command. 


cuu Channel and unit number of the device to be reserved. 

TT om } 

| Operation | Operands | Type | 

— aa -- + 
[//] RESET | {SYS|PROG|ALL| SYSxxx} | SCG Jes: | 

l aah. b. ei | 


The RESET command or statement resets temporary LIBDEFs and I/O assignments to 
their permanent values in the partition in which RESET was submitted. 


sYS Resets all system logical unit assignments and library search chain 
definitions to their permanent values. 

PROG Resets all programmer logical units to their permanent assignments. 

ALL Resets all logical unit assignments and library chain definitions 
to their permanent values. 

SYSxxx Resets the specified logical unit to its permanent assignment. 


SYSIN or SYSOUT cannot be specified. 


i T 
| Operation | Operands | Type 


1 

| 

—— 

| ROD | none | JCC | 
i 


The ROD (Record on Demand) command records all statistical data record counters 
for all non-telecommunication devices on the recorder file on SYSREC. 


[a a a co. =o ed 
| Operation | Operands | Type | 
f ot 

| // RSTRT | SYSxxx,nnnn[,filename] | Jcs | 
| a a Eero =e cee 


The RSTRT (Restart Checkpointed Program) statement is available for checkpointed 
programs. 


SYSxxx Logical unit name of the device on which the checkpoint file is 
stored. 

nnnn Identification of the checkpoint record to be used for restarting. 

filename The name of the disk checkpoint file to be used for restarting. 


Rea, ae hep ee bay ek Re ee ee ae ee a pe ee, es 


| Operation| Operands | Type | 
;_———+-- to | 
| SET | {UPSI=config] [ , LINECT=count ] { ,RCLST=number] JCC 


| 
| | [,RCPCH=number][,RF={yes|create}] 
| | [,DATE=date] [,HC={yes|no[create}][,SDL] | 


The SET command sets controls for the execution of programs. Except for SET 
UPSI, 
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UPSI=config 


LINECT=count 


RCLST=number 


RCPCH=number 


RF=YES | CREATE 


DATE=date 


Sets the bit configuration of the UPSI byte in the 
communications region. Specify one to eight characters, 
either 0, 1, or X. 

Sets the standard number of lines to be printed on each page 
of SYSLST. Specify an integer between 30 and 99. 

Decimal number indicating the minimum number of SYSLST disk 
records remaining to be written before operator warning. It 
may be any decimal number from 100 through 65535. 

Default is: RCLST = 1000. 


Decimal number indicating the minimum number of SYSPCH disk 

records remaining to be written before operator warning. It 

may be any decimal number from 100 through 65535. 

Default is: RCPCH = 1000. 

Defines the status of the recorder file (IJSYSRC) on SYSREC. 

YES (default) Indicates that an active recorder file 
exists. The system opens this file when the first JOB 
statement is encountered. 

CREATE Instructs the system to create a recorder file when the 
first JOB statement is encountered. 

Sets the system date permanently to the specified value. 


date can have the following formats: 

mm/dd/yy or dd/mm/yy 

mm = month (01-12); dd = day (01-31); yy = year (00-99). 
The first format is the system default (can be changed by 
using the STDOPT command) 


HC=YES|NO|CREATE Defines the status of the hard-copy file (IJSYSCN) on SYSREC. 


YES Indicates that a hard-copy file exists in the system, 
and that it is to be opened. YES is the default. 
NO Indicates that no recording is to be performed on the 


hard-copy file. (only if a console printer is attached) 
CREATE Instructs the system to create a hard-copy file. 


SDL Indicates that phase names are to be added to the system 
directory list and, optionally, that phases are to be loaded 
into the SVA. 

If the requested phase is not present in IJSYSRS.SYSLIB, a 
dummy entry is created until the specific phase is cataloged. 
fC oe le oa end? yee 
Operation| Operands | Type | 
—|— 
SETDF {3800|cuu}[, BURST=[Y|N]][,CHARS=[table-name] ] AR 


| 
r 
| | 
| | 
| | 
| | 
| | 
| | 
| | 


| 
[, FCB=[fcb-name] ] | 
{ ,FLASH=[overlay-name] } | 
[ ,FORMS=[ forms -name] } | 
[, LIST] | 
[ ,MODIFY=[copymod-name] ] | 
[RESET] | 


es Le 


The SETDF command allows to set and/or reset default values for the IBM 3800 
Printing Subsystem or to display the default values. 


3800 
cuu 


BURST=, 


CHARS=, 


All 3800 printers will be set with the specified default values of 
SETDF. 

Channel and unit number of the 3800 whose default values are to be 
set or displayed by SETDF. 

No change in the threading of the forms is requested. 

Y. Specifies that the printed output is to be burst into separate 
sheets with the edges trimmed. 

N. Specifies that the printed output is to be in continuous fanfold 
mode. BURST=N is the default. 

The default for the character arrangement table is reset to the 
hardware default Gothic-10 folded table. 


table-name specifies the l- to 4-character suffix of the name of 
the default character arrangement table. 
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The default for the forms control buffer is reset to the hardware 


default FCB. 


fcb-name specifies the 1- to 4-character suffix of the name of the 


default FCB. 


FLASH=, No flashing is done. 
overlay-name specifies the 1- to 4-character name of the forms 
eos overlay frame to be used as the default. 
no x FORMS=, The operator is requested to load the forms named STANDARD when the 
Bas j default is needed. 
forms name specifies the 1- to 4-character name of the forms to be 
used. 
LIST The established default settings are to be displayed at the 
operator console. 
MODIFY=, No copy modification is done. 
copymod-name specifies the 1- to 4-character suffix of the 
geeks modification phase name. 
& \ RESET Sets all keywords to the hardware defaults. 
wo CF ee ne 
| Operation | Operands | Type | 
ones Ee a { 
| SETMOD | cuu[,mode] | AR | 
L L i) 


The SETMOD (set mode) command, (valid for 8809 Magnetic Tape Unit only) can be 
used to adjust the tape speed to the actual I/O traffic. 


cuu Specifies the channel and unit number of the 8809. 
mode Can be one of the following: 
90 (or HL) = High Speed, Long Gap (Streaming) 
30 (or HS) = High Speed, Short Gap (Streaming) 
50 (or LL) = Low Speed, Long Gap (Start-Stop) 
60 (or LS) = Low Speed, Short Gap (Start-Stop) 
60 (or LS) is the default. 
a ica can 71 
| Operation | Operands | Type | 
| [//] SETPARM | pname=[{value|$RC|SMRC}][{,...] | Jcc,Jcs | 
; 4 The SETPARM statement enables you to define a symbolic parameter and/or assign a 
— value to it. 
pname Name of the symbolic parameter to be defined - 1 to 7 alphameric 
characters. (first must be alphabetic) 
value Character string of up to 50 characters. A string containing 
national or special characters, must be enclosed in quotes. 
$RC Return code of the last job step which was executed. 
$MRC Specifies the maximum return code of all preceding job steps. 
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fo nee Wh aah, ee Dg DS ete a Oe ee eh ee ee A 


| Operation 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


—— 


[//] SETPRT 


| Operands 


| SYSxxx[, BURST={N|Y|*}] | 
| {,CHARS={table-name|*| (table name,...)}] | 
| [,COPIES=number ] [ , DCHK={B|U}] | 
| [,DEBUG={NORM | TERM | DUMP | TRAC} ] | 
| [,DFLT={N|Y}] | 
| [,FCB={ £cb-name|*(fcb-name,V)|(*,V)}] | 
| [,FLASH={overlay-name[ ,count]|(,count) | | 
| (*[, count ]} | 
| [,FORMS={ forms -name|*}] [INIT={N|Y}] | 
| [,MODIFY={ copymod-name |*| | 
| (copymod-name, table name) }] | 
Jb [ ,SEP=0] { ,TRC={N|Y}] | 

ad es 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


The SETPRT (set printer) job control statement or command sets user-specified 
control values for the IBM 3800 Printing Subsystem. 
At least one of the optional operands must be specified. 


SYSxxx 


BURST= 


CHARS= 


COPIES= 


DCHK= 


DEBUG= 


DFLT= 


Logical unit identifier for the 3800 printer to be set up. This 
operand is always required. 
If the operand is omitted, no change to the threading is requested. 


Y specifies that the operator should thread the forms through the 
Burst-Trimmer-Stacker. 


N specifies that the operator should thread the forms to the 
continuous forms stacker. 

* specifies that the system default BURST setting is requested. 
If omitted, the character arrangement table is not changed unless 
INIT=Y is coded. 


table-name specifies the 1- to 4-character suffix of the character 
arrangement table name. 


(table-name,...} specifies up to four names, separated by commas 
and enclosed in parentheses. 

* specifies that the system default character arrangement table is 
requested. 

If the operand is omitted, the number of copies is not changed 
unless INIT=Y is coded. 


n (value from 1 to 255) specifies the number of copies of each page 
to be reproduced before printing the next page. 
If the operand is omitted, data checks are blocked. 


B specifies that data checks are to be blocked. 


U specifies that data checks are allowed. 
NORM sets a return code in register 15 and returns to the caller on 
any exit from the SETPRT routines. 


TERM sets a return code in register 15 and cancels the activity for 
return codes higher than 4. 


DUMP sets a return code in register 15 and cancels the job with a 
dump, for a return code higher than 4. 


TRAC dynamically traces, on SYSLST, the activity of the SETPRT 
routines and then cancels the job with a dump if the SETPRT return 
code is greater than 4. Tracing requires 12K of GETVIS space. 

N is the default specification for this keyword and does not 
establish 3800 default setup. 

Y specifies that the printer is to be set with the defaults that 
were specified by the operator in the SETDF command. 
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FCB= If the FCB operand is omitted, the FCB is not changed unless INIT=Y 
is coded. 
fcb-name specifies the 1- to 4-character suffix of the name of the 
FCB. 


V requests FCB verification. 


* specifies that the system default FCB is requested. 
FLASH= overlay-name is the 1- to 4-character name of the forms overlay 
frame. 


count is the number (from 0 to 255) of copies to be flashed with 
the overlay. 
If no count is specified, all copies are flashed. 
* requests the system default forms overlay. 
FORMS= forms-name is the 1- to 4-character forms identifier. 
* requests the system default forms. 
INIT= Y specifies that the printer be reset to hardware defaults. 


N is the default and does not reset the 3800 to hardware defaults. 
MODIFY= copymod-name specifies the 1- to 4-character suffix of the 
modification phase name. 


table-name specifies the 1- to 4~-character name of the character 

arrangement table to be used when the 3800 prints the copy 

modification text. 

* requests the system default copy modification. 

SEP= O indicates that, if the burster-trimmer-stacker is being used, the 
3800 should offset-stack the pages that follow from the pages that 
were previously transmitted. If the continuous forms stacker is 
being used, the 3800 changes the marking on the perforation edge 
from one line to two lines or vice versa. 

TRC= N indicates that, for any DIFPR or DTFDI operand after this SETPRT, 
data lines do not contain table reference characters unless 
specified in the DIF macro. 


Y indicates that the first character of each output data line 
(after the optional print control character) given to the access 
method is a table reference character. 


anes T T I 
| Operation | Operands | Type | 
me — 

| SIZE | partition=<nK|mM>[,partition=<nK|mM>]... | JCC,AR | 
Hk te ene thee ee, 


The SIZE command is used to specify the amount of contiguous virtual storage in 
a partition which is reserved for program execution. The rest of the partition 
is available as partition GETVIS area. 


partition Partition (BG, Fl, F2, ...) for which storage is to be reserved. 
nK | mM Amount of storage to be reserved in kilobytes (nK) or megabytes 
(mM). The remainder of the partition is available as partition 
GETVIS area. 
n should be a multiple of 4. 


| Operation | Operands | Type | 
pe np 
| START | [BG]Fn] | AR | 
_-———__—_+— +———+ 
| START | Fn | Joc —_ || 
ie ani Sis eee ae 


The AR START (Start or Continue Processing) command activates or continues 
processing in the specified partition. The function of the START command is 
exactly the same as that of the BATCH command. 


BG Indicates that the background partition is to be reactivated. 


Chapter 2. VSE/AF General Information 2-37 


Licensed Material - Property of IBM 


© Copyright IBM Corp. 1985 


Fn Specified foreground partition is to be activated, or restarted 
after a STOP command. 


fi ho a ees a oe S/F eed 


| Operation | Operands | Type | 

| [//] STDOPT | option[,option]... | Jcec,scs | 

The STDOPT (standard options) command or statement sets or resets the permanent / 

job control options which were established at system initialization (system ; 

defaults). o 


The options, which can appear in any order, are as follows (the first 


specification is always the system default value): 


ACANCEL=NO | YES 


ALIGN=YES | NO 
CHARSET=48C | 60C 
DATE=MDY | DMY 


DECK=YES | NO 


DUMP=YES |NO| PART 


EDECK=NO | YES 


ERRS=YES | NO 


FASTTR=NO 


HCTRAN=YES | NO 


JCANCEL=NO | YES 


LINES=56 |nn 
LIST=YES | NO 
LISTX=NO | YES 
LOG=YES | NO 
RLD=NO | YES 


SXREF=NO | YES 


SYM=NO | YES 


SYSDUMP=NO | YES 


TERM=NO | YES 


Specifies whether job control is to cancel jobs automatically 
(ACANCEL=YES) or to wait for operator intervention (ACANCEL=NO) 
after an unsuccessful attempt to assign a device. 

Specifies whether the assembler is to align data on halfword or 
fullword boundaries, according to the type of instruction used. 
Specifies either the 48- or 60-character set for PL/I 
translator input on SYSIPT. 

Specifies the format of the date: 

MDY=month/day/year DMY=day/month/year. 

Specifies whether or not language translators are to produce 
object modules on SYSPCH. 

Specifies whether or not a dump of the registers and virtual 
storage is to be taken in the case of an abnormal program end. 
PART specifies that a dump of the major suvervisor control 
blocks and the virtual storage of the partition is to be taken. 
Specifies if the assembler is to create and punch edited macros 
on SYSPCH. 

Specifies whether or not language translators are to summarize 
all errors in source programs on SYSLST. Assembler and PL/I 
always assume ERRS=YES. 

Specifies that fast CCW translation is to be switched off for 
all partitions. This operand overrides the FASTTR=YES 
supervisor option. 

When you have submitted the STDOPT command or statement with 
the FASTTR=NO operand, only a new IPL can re-activate fast CCW 
translation. 
Specifies whether 
translated to all 
case. 

Specifies whether 


the output from PRINTLOG and LISTLOG is to be 
upper case (YES) or in mixed upper and lower 


or not the system should terminate the job 

abnormally when a job control error occurs (JCANCEL=YES), or 

wait for operator intervention (JCANCEL=NO). 

Specifies the number of lines per page on SYSLST. The minimum be 
is 30, the maximum is 99. A 
Specifies whether or not language translators are to write 
source module listings and diagnostics to SYSLST. \ 
Specifies whether or not language translators are to write 
hexadecimal object module listings on SYSLST. 

Specifies whether or not all job control statements are to be 
listed on SYSLST. 

Specifies whether or not the relocation dictionary information 
is to be printed. 

Specifies whether the assembler is to print short 
cross-reference lists on SYSLST. The printing of unreferenced 
labels is suppressed. Do not specify SXREF=YES together with 
XREF=YES. 

SYM=YES specifies that the PL/I compiler is to produce a symbol 
and offset table listing on SYSLST, or that the COBOL compiler 
is to produce a data division glossary. 

YES indicates that dumps are to be written to the dump 
sublibrary which has been defined for the partition via a 
LIBDEF DUMP command. SYSDUMP=NO specifies that dumps are to be 
written to SYSLST. For compatibility reasons, the keyword may 
be entered as SYSDMP. 

Specifies whether messages from a compiler are to be displayed 
on SYSLOG. 
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XREF=YES | NO XREF=YES specifies that the assembler is to write symbolic 
cross-reference lists on SYSLST, or that American National 
Standard COBOL is to produce a cross-reference listing. 


| Operation | Operands | Type | 
| STOP | none | JCC 
aA a rca NOR I eae eee eae rs ere tee Seat Peel 


The STOP (Stop Processing) command indicates that there are no more jobs to be 

executed in the partition in which the command is given. 

This command removes the partition from the system's task selection mechanism, 

but the partition remains active. Job control remains in the partition and can 
be restarted by the START or BATCH attention routine command. 


[generation-number], 
[version-number ] 
[ , DISP=NEW | OLD | MOD] 


| Operation | Operands | Type | 
4 
| // TLBL | filename,['file-id'],[date], | JCS (for 
| | [file-serial-number], | EBCDIC | 
| | [volume-sequence-number], | files) | 
| | [file-sequence-number], | | 
| | [generation-number], | | 
| | [version-number] | 
| | [,DISP=NEW|OLD|MOD] | 
// TLBL filename, ['file-id'], [date], | JCS (for 
[set-identifier], | ASCII 
[file-section-number], | files) 
| 
| 
| 
| 


| 
| 
| 
| [file-sequence-number], 
| 
| 
| 


The TLBL (Tape Label Information) statement contains file label information for 
the checking and writing of tape labels. 


filename One to seven alphameric characters, the first of which must be 
alphabetic. 

"file-id' One to seventeen alphameric characters, contained within quotes. 

date Output files: Retention period in days written as a decimal 


number (0-9999) or the expiration date in the format 19yy/ddd or 
20yy/ddd (yy = year, ddd = day.) Format yy/ddd is also accepted. 
(85/032 is interpreted as 1985/0032. 


Input files: Creation date of the file in the format: 19yy/ddd 
or 20yy/ddd or yy/ddd (yy=00-99, ddd=1-365). 


file-serial-number (EBCDIC) / set identifier (ASCII) 


One to six alphameric characters indicating the volume serial 
number of the first (or only) reel of the file. 


volume-sequence-number (EBCDIC) / file-section-number (ASCII) 


A one to four-digit decimal number specifying the volume of a 
multi-volume file at which you wish to start processing. 

file-sequence-number A one to four-digit decimal number specifying the file of a 
multi-file volume at which you wish to start processing. 

generation-number A one to four-digit number specifying the generation number of 
the file to be processed. 

version-number A one or two-digit decimal number specifying the version number 
of the file to be processed. 

DISP=NEW|OLD|MOD This operand specifies whether a new output file is to be 
created or an existing file extended. The specifications have 
the following meanings: 


NEW - Specifies that the file is to be created. This is the 
default. 

OLD - Specifies that the file already exists and is to be 
extended. 
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MOD - Specifies conditional extension or creation of the file. 
| Operation | Operands | Type | 
| TPBAL | [n] | AR | 


The TPBAL (teleprocessing balancing) command allows the operator to change or 2 
display on SYSLOG the status of the TP balancing function. ee 


n specifies the number of partitions in which processing can be Nw 
delayed. (number of partitions in the system minus one.) 


| Operation | Operands | Type | 
| UcS | SYSxxx,phasename[,FOLD] [,BLOCK][,NULMSG] | JCC 
es Sesh Se ae a a oly 


The UCS (load universal character set buffer) command causes the 240-character 
universal character set contained in the phase specified by phasename to be 
loaded as buffer storage in the IBM 2821 Control Unit. 


SYSxxx: The logical unit assigned to a 1403 printer with UCS feature. 
phasename Name of the phase to be loaded, followed by an 80-character 
verification message. 


FOLD Enables printer to print lower case bit configurations as upper 
case characters. 

BLOCK permits unprintable characters to be printed as a blanks without 
causing a data check stop. 

NULMSG Suppresses the 80-character verification message to be printed 


after the buffer is loaded. 


| Operation | Operands | Type | 


| UNBATCH | none | Jcc | 
i I re es 


The UNBATCH command terminates foreground processing and releases the partition 
(making it inactive). 


SS ee 
| Operation | Operands | Type | 
| UNLOCK | SYSTEM=sys-id | AR | 


The UNLOCK command is used to release all resources locked by the specified 
system. 


sys-id Specifies the CPU-ID of the CPU which has become inoperative. The 
command will release all locks belonging to the named system. 


[pont pe ee —— Fs Oy ay en ee hg ee ew es ae 
| Operation | Operands | Type | 


| // UPSI | string | JCS | 

The UPSI (user program switch indicators) statement allows you to set program 
switches that can be tested by applications during execution. 

string is a string of one to eight characters, which correspond to the bit 


positions of the UPSI byte in the communication region. The 
specified character string must consist of 0, 1 and X. 


2-40 IBM VSE/Advanced Functions Handbook 


Licensed Material - Property of IBM © Copyright IBM Corp. 1985 


[rege ee fee OS ee pe br oe ny ee ed, 


| Operation | Operands | Type | 
| VOLUME | [c]cu]cuu] | AR | 
a eR en Sa ee ee 


The VOLUME command provides the operator with a short summary of the volumes 
mounted on disk devices, together with an indication of whether or not a volume 
is in use, shared by another system, or reserved for VSAM space management 
usage. 


c Channel address. Information for all disks on specified channel. 

cu Channel and control unit address. Information for all devices on specified 
channel and control unit. 

cuu Device address. Information for the specified device only. 


f T 7 

| Operation | Operands | Type | 

f = 
0. mm 

| // ZONE | {EAST|WEST} /hh/ | 3cs | 

L re ees 8 


The ZONE statement defines the time difference between local time and Greenwich 
mean time. 


EAST A geographical position east of Greenwich. 
WEST A geographical position west of Greenwich. 
hh/mm A decimal value that indicates the difference in hours (00 to 23) 


and minutes (00 to 59) between local time and Greenwich Mean Time. 


—_ ; an eho yO ey ee eg 
| Operation | Operands | Type | 
' + 

gs | label | gcc,Jcs | 
{i ! pot te a 


The label statement defines a point in the job stream up to which you may want 
to skip JC statements using a GOTO statement or the GOTO action of an ON 
statement. When a GOTO is raised, processing continues at the JC statement 
following the /. label statement specified. 


Column 1 contains a slash (/) and column 2 a period (.). Column 3 must be blank. 
label is a name consisting of one to eight alphanumeric characters. 


The first character must be alphabetic. Symbolic parameters are 
not allowed in this statement. 


apex ye 2 aes ties | 
| Operation | Operands | Type | 
4 
| /+ | [comments ] | Jcs | 
(ieee ! 2 eee eee | 


The /+ statement marks the end of a job control procedure. It must be included 
as the last statement when a procedure is cataloged. 


a oe re eee ay a ae a a ee ee ee ee ee Ve ee 


| Operation | Operands | Type | 
| /* | [comments ] | Jcs | 
i ee ee 


The end-of-data file statement must be the last statement of each input data 
file on SYSRDR and SYSIPT. 
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aa. =. SS 

| Operation | Operands | Type | 
| * | {comments ] | JCs | 
DiS a Se ed 


The content of the comment statement is printed on SYSLOG. If followed by a 


PAUSE statement, the statement can be used to request operator action. Column 1 
contains an asterisk, column 2 must be blank. 

[a Age ca te eee a ore 

| Operation | Operands | Type | 

| /& | [comments ] | Jcs | 

| CRE Se caer ee [ ee pa 


The end-of-job statement must be the last statement of each job. Any comments, 


beginning in column 35, are printed at end of job. 
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[Oe gy ke ee oe ome ae A ee a gh eg 
| Operation | Operands 


| ACTION | [,MAP] ,NOMAP] [{ ,NOAUTO] 
| 


a 
| [,CANCEL][,SMAP] | 
Soe 


This statement is used to indicate linkage editor options. The statement must 
be the first linkage editor statement in the input stream. 
At least one blank must precede ACTION. 


MAP Requests the linkage editor to write to SYSLST a map of virtual 
storage, which can be used for problem determination. 
If the MAP operand is specified, SYSLST must be assigned. 


NOMAP Indicates that the MAP option should not take effect. 

NOAUTO Indicates that the AUTOLINK function is to be suppressed for the 
present linkage editor run. 

CANCEL Cancels the job automatically if any of messages the 2100] 
through 2170I occur. 

SMAP Indicates that, in addition to the standard virtual storage map 


in which the control sections are ordered by load address, a 
listing of the CSECT names ordered alphabetically is also 


generated. 
fee op eo oe Se ee ee a aan | 
| Operation | Operands | 
+ 
| ENTRY | [entrypoint] 
Lu i pee 


Every program, as input for the linkage editor, is terminated by an ENTRY 
statement. 
At least one blank must precede ENTRY. 


entrypoint Specifies the name (label) of an entry point. It must be the 
name of a CSECT or a label definition (source ENTRY) defined in 
the first phase. This address is used as the transfer address to 
the first phase in the program. 


[— tT a | 
| Operation | Operands | 
| INCLUDE | [modulename][,(namelist)] | 
L = eae j 


INCLUDE indicates that an object module is to be included for editing by the 
linkage editor. 
At least one blank must precede INCLUDE. 


If both operands are omitted, the object module to be included is assumed to be 
on SYSIPT. Job control copies it from there to SYSLNK. INCLUDE statements with 
no operands are recognized only on SYSRDR. 


modulename (1 to 8 alphameric characters) Specifies the name of the module, 
as used when cataloged in the sublibrary. 
(namelist) The linkage editor generates a phase from only the control 


sections specified in this operand. The namelist is in the 
following format: 


(csnamel,csname2,...) 
fom = oo, eh en aA hp 
| Operation | Operands 
—— 
| PHASE | name,origin[ ,NOAUTO] [ ,SVA][,PBDY] | 
Pe te a a eel 


This statement provides the linkage editor with a phase name and an origin point 
for the phase. 
At least one blank must precede PHASE. 
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name Specifies the name of the phase. One to eight alphameric (0-9, 
A-Z, #, $, and @) characters are used as the phase name. The 
name may not be ALL, S, or ROOT. 

origin Specifies the load address of the phase. The load address can be 
in one of the following forms: 


1. symbol[ (phase) ][{+relocation] 
2. “*[+relocation] 

3. S[+relocation] 

4. ROOT 

5. +displacement 


Items 1 to 4 specify a relative address, item 5 an absolute 
address. ; 


A phase can be made relocatable if its origin is specified as a 

relative address (formats 1-4 above). However, if the address is 

relative to another phase which is not relocatable, the new phase 

will not be relocatable. If the operand origin is not specified, 

the phase is made relocatable. 

1. symbol: A previously defined phase name, control section 
name, or external label. 


(phase): If symbol is a previously defined control section 
name or a previously defined external label that appears in 
more than one phase, phase (in parentheses) directs the 
linkage editor to the phase that contains the origin. 


relocation: The origin of the phase currently being 
processed 

a+ or a - followed by: X'hhhhhh' (1 to 6 hexadecimal 
digits); 

a+ oor a- followed by: dddddddd (1 to 8 decimal digits); 
a+ oor a - followed by: nK, (where n is the number of 
kilobytes). 


2. %*: For the first PHASE statement processed, the origin is to 
be the first doubleword storage address after the partition 
save area, or the area assigned to the COMMON pool (if any). 


relocation: Relocation of the phase relative to the next 
storage location of the wirtual partition. 


3. S$: if S is specified, the origin is determined in the same 
manner as for the first PHASE statement. 


relocation: Relocation of the phase relative to the start of 
the virtual partition. 


4. ROOT: Tells the linkage editor that the phase that follows 
is a root phase. 
Only the first PHASE statement in the linkage editor input 
can specify ROOT. 


5. displacement: Allows the origin (loading address) to be set 
at a specified location. 
displacement must be: 
X'hhhhhh' (one to six hexadecimal digits), 
dddddddd (one to eight decimal digits), or 
nK (where n is the number of kilobytes. 
A displacement of zero (+0) denotes a self-relocating 


program. 

NOAUTO The Automatic Library Lookup (AUTOLINK) feature is suppressed for 
the current phase. 

SVA The phase is SVA-eligible. This means that the phase must be 
re-enterable and relocatable. 

PBDY The phase is to be link-edited on a page boundary. 
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The following is a complete list of the VSE Librarian commands: 


| Command Name 


| ACCESS 
| BACKUP 
| CATALOG 
| CHANGE 
| COMPARE 
| CONNECT 
| COPY 

| DEFINE 
| DELETE 
| Goro 

| INPUT 

| LIST 

| LISTDIR 
| 

| 

| 

| 

| 

| 

| 

| 

| / 


RELEASE 
RENAME 
RESTORE 
TEST 
UPDATE 


| Library 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


Command Object 


| Sublibrary 


bea! DS PS DS DS OS OOS rs P< 


OS MPS OOS 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


'*' means: generic specification accepted. 


Chapter 2. 


| Member | 


X * 


PS PS OS OOS 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
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LIBRARIAN COMMANDS 


fi enn Sl me in Oe Se eee oe eee oe oe ae ee ee oe ge ee 
| Access | {Sublib=1.s | 7} | 
SS ap eae (Re aE OO I ee ee See eee ee | 


The ACCESS command specifies the sublibrary, qualified by the library name, to 
be used in any following command which has a member_name.member_type 
specification as its operand. 


If you code a question mark as operand, the name of the library and sublibrary 
currently accessed is displayed on SYSLOG, if the command was entered from 
there, otherwise on SYSLST. 


Backup {Lib =1 ...} Tape={SYSnnn+ [Restore={Online} ] 


1 
| | ee | 
| | {Sublib=l.s ..} {cuu  } {Standalone} | 
| | | 
| | 


.. {Include=Historyfile] [ID=name] [Header=1.s.mn.mt] 


The BACKUP command causes libraries, sublibraries or SYSRES files to be copied 
to tape. (including reorganization) 


Lib=1 Library to be backed up. The library names IJSYSR1 to 
IJSYSR9 specify SYSRES files. IJSYSRS is the IPL'ed system. 

Sublib=1.s Sublibrary to be backed up. You may code a list of 
sublibrary names. 

Tape=SYSnnn | cuu Programmer logical unit or physical unit address. (Tape 


unit to be used for output.) 

Restore=Online|Standalone Specify how the backed up data are to be restored. 
This operand is applicable only to libraries and SYSRES 
files. The default value is ONLINE. 

Include=Historyfile The system history file should also be backed up. 


ID=name Identification for the backup file to be created by this 
BACKUP command. 
Header=1.s.mn.mt Optional header to be written to the first file on the 


backup tape. - 


f=. 1 
| CAtalog | mn.mt [Eod=xx] [Data={Yes}] [Replace={Yes}] | 


| | % {No} {No} | 
mes ee ea PO OTC a TE ee 


The CATALOG command causes the data following it to be cataloged under the name 
and type specified. 


Any member types (except PHASE and DUMP) can be cataloged into any sublibrary 
using this command. 


mn.mt Name and type under which the following data are to be cataloged. 
mn and mt may each be 1 to 8 characters long, and must be 
alphanumeric. The member type must not be PHASE or DUMP. These 
types can be cataloged only by the Linkage Editor and Dump 
program respectively. 

Eod=xx Combination of two characters to be used to indicate end-of-data 
in the following input. The default is /+. 

Data=Yes |No Applicable only for procedures. The member type must be PROC or a 
user type. You must code DATA=YES if the procedure contains 
SYSIPT data. The system default is DATA=NO. 

Replace=Yes|No Allows conditional cataloging. REPLACE=YES is default. 


For compatibility with the old CATALS function, BKEND, MACRO and MEND are 
allowed as EOD statements when migrating to the VSE librarian. They can start 
in column 1. 


Us feces BO ee me gs ee OO oe ed =e fie = =. sa eee 
| CHange | Sublib=l.s ... [REUse={Automatic|Immediate}] | 
a 


The CHANGE command can be used to change the REUSE attribute of a sublibrary. 
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Sublib=1.s The qualified name of the sublibrary whose REUSE attribute is to 
be changed. 

REUse=Automatic|Immediate Specifies which REUSE attribute the specified 
sublibrary (or sublibraries) should have from now on. 
(Automatic is the default) 


When IMMEDIATE is specified, any space which is no longer in use 
in the sublibrary, but has not yet been freed, is freed at once. 


| COMpare | {Lib =l [:] 1 ...} [Data={Directory}] | 
| | {Sublib=l.s [:] l.s ...} {Member } 

| | {mn .mt viet | 
| | .. [Punch={Yes|No}] | 
eee I 


The COMPARE command is used to compare libraries, sublibraries or members, and 
provide a listing of the differences, as explained under the DATA operand below. 


Lib=1 Specifies the names of the libraries to be compared. 
Comparing is done for all sublibraries in each of the 
specified libraries. 

Sublib=l.s Specifies the sublibraries to be compared. An equals sign 
can be coded in the second operand in place of an 
identical name in the first operand. 

mn.mt Member(s) to be compared. 

Data=Directory|Member Directories or member contents to be compared. The 
default is DATA=DIRECTORY. 


Punch=Yes |No This operand is valid only with DATA=DIRECTORY. If you 
specify PUNCH=YES, the system generates COPY statements on 
SYSPCH. 


TT an) Te a] | 
| CONnect | {Sublib=l.s [:] l.s | ?} | 
{ { J 


The CONNECT command must be used before COPY, MOVE, or COMPARE commands. The 
function is similar to that of the ACCESS command, except that CONNECT must be 
used before commands which require two sublibraries to be specified. 


The first operand of the CONNECT command specifies the }from}} sublibrary 
required for the following commands, and the second operand the }to} or second 
sublibrary. 


If a question mark is specified as operand, the current CONNECT information is 
displayed on SYSLOG. (If command was entered from SYSLOG.) 


| COPy | {Lib =1 [:] 1 ...} [Replace={Yes}] [LISt={Yes}] “| 
{| {Sublib=1.s [:] ls ...) {No } {No } | 
| | {mn.mt weed | 


a ee 


The COPY command is used to copy libraries, sublibraries or members. 
This command can also be used to merge sublibraries. (See example.) 


CONNECT LIBA.SUB1 : LIBB.SUB2 
COPY * * 


Lib=1:1 Libraries to be used in the copy operation. 
Sublib=l.s:1l.s Sublibraries to be used in the copy operation. 


If a name in the second operand is the same as one in the first 
operand, it can be replaced by an equals sign. 

mn .mt Member(s) to be copied. The }from} and }to} sublibraries must be 
specified in a preceding CONNECT command. 

Replace=Yes|No Specifies whether copying should be conditional or unconditional. 


LISt=Yes |No If YES is specified, the names and types of the members copied 


and those of the corresponding }to} and }from} libraries and 
sublibraries will be printed on SYSLST. 
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SSS SS SSS ee 
| DEFine {Lib=] ... }[Replace={Yes}] | 
| {Sublib=l.s ... [REUse={Automatic| Immediate} ]} {No } | 
a a ae sn ee 


The DEFINE command is used to create system libraries (SYSRES files), private 
libraries and sublibraries. 


Lib=1 Name(s} of the library or libraries to be created. Library 
names may be 1 to 7 characters long, and must be alphanumeric. 
The first character must be alphabetic. Use the names IJSYSR1 
to IJSYSR9 to define SYSRES files to be created. The name 
IJSYSRS must not be used, as it defines the IPL'ed system. 

Sublib=1.s Qualified name(s) of the sublibrary or sublibraries to be 
created. Sublibrary names may be 1 to 8 characters long, and 
must be alphanumeric. 

REUse=Automatic|Immediate This operand is needed in a disk sharing environment, 
or when several tasks share the same sublibrary. 
(REUse=Automatic is the default) 
REUSE=IMMEDIATE causes the space to be freed as soon as the 
members are deleted. 
REUSE=AUTOMATIC causes the space to be freed only when the 
sublibrary is in use by only one CPU in the sharing 
environment, and by only one task. 

Replace=No|Yes This operand controls conditional creation of libraries and 
sublibraries. (Replace=No is the default) 


Eo ae we dlitoe poe Ot oy a te cl aig ee Rs eee ee ee ee) 
| DELete | {Lib =1  ... } 
| {Sublib=l.s ... } | 


| 
| | {mn.mt ... } | 
ete St ee i ee 


The DELETE command is used to delete members, sublibraries or libraries. 


Lib=1 Library or libraries to be deleted. The system library IJSYSRS 
may not be deleted, as it contains the IPL'ed system. 

Sublib=1.s Sublibrary or sublibraries to be deleted. The system sublibrary 
IJSYSRS.SYSLIB cannot be deleted. 

mn.mt Member(s) to be deleted. 


Roepe Gite 8 oe ee a ee ee ee 
| GOTO | label | 
Le a i ee 


The Librarian GOTO command has the same function as the job control GOTO 
command. 


label Specifies the operand of the LABEL command after which processing 
is to continue. 


foe yee se ep et Ee ee ES 
| Input | SYSIPT | 
[ee ee lb A Sr ee PO oS eI ee | 


The INPUT command cause the librarian to read any following commands from SYSIPT 
instead of SYSLOG until the end of the current job step. 


a a  S - e Pepaee ee ke oer 
| List | mn.mt ... [Unit={SYSLST}] [Format={Hex}] 
{SYSLOG} | 


eee aaa 


The LIST command causes the contents of one or more members to be displayed on 
SYSLST or SYSLOG. 

Phases and dumps are listed in a combined hexadecimal and character string 
format. 


mn.mt Member(s) to be displayed. 

Unit=SYSLST|SYSLOG Output device to be used. If the LIST command is issued from 
SYSLOG, the default output device is also SYSLOG. 
Output length on SYSLOG is 68. 
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Format=Hex FORMAT=HEX results in the character string representation of 
each record of a member, followed by a two-line hexadecimal 
translation. 

| LISTDir | {Lib =1 ..} [Output={Full } ] [Unit={SYSLST}] | 

| LD | {Sublib=l.s ...} {Normal} {SYSLOG} 

| | {mn.mt .} {SHort } | 

| | {SDL } {STatus} | 

Los aa es ree 


The LISTDIR (list directory) command is used to display the contents of a 
directory. The output is a list sorted in alphanumeric collating sequence. 


Lib=1 Specifies that the directory information of a library or 
libraries is to be displayed. 

Sublib=1l.s Specifies that the directory contents of a sublibrary or 
sublibraries is to be displayed. 

mn.mt Specifies one or more members. Librarian displays only those 
parts of the sublibrary directory which are relevant to the named 
member(s). 

SDL » System directory list is to be displayed. The OUTPUT operand is 


not applicable when SDL is specified. 

OUTPUT=Full|Normal|SHort|STatus Controls the kind and amount of information 
provided. The specifications FULL, NORMAL and SHORT are 
applicable for libraries, sublibraries and members. STATUS is 
applicable only for libraries and sublibraries. The operand may 
not be specified together with SDL. OUTPUT=NORMAL is the system 
default. 

Unit=SYSLST|SYSLOG Output device to be used. Default is SYSLOG, If command is 
issued from SYSLOG. 


| Move | {Lib =1 :Jol ...} [Replace={Yes}] [LISt={Yes}] | 
| {Sublib=l.s [:] l.s ...} {No } {No } | 
| | {mn .mt Lee} | 


ee eed 


The MOVE command works in a similar way to the COPY command, except that the 
data which have been moved to a target library or sublibrary are deleted from 
the from-location after they have been copied. 


Lib=1:1 Libraries to be used in the MOVE function. 
Sublib=l.s:l.s Sublibraries to be used in the MOVE function. 
mn.mt members to be moved. 


Replace=Yes|No Specifies whether moving is to be conditional or not. If YES is 
specified, the }from} sublibraries or members will be moved to 
the }to} library or sublibrary in any case. REPLACE=NO prevents 
the MOVE operation if a duplicate name already exists. 


LISt=Yes |No LISt=YES forces a listing of moved member names and types on 
SYSLST. 

=] —— 

| ON | $RC {>} n {GOTO label} 

| | {<} {CONTinue } 

| | {=} | 

Lx L } 


The ON command allows conditional execution of librarian command streams in 
batch mode. 


The ON command causes the Librarian program to test the return code after each 
following command. If comparison of return code matches the condition, the 
specified action is taken. 


SRC Return code of any following Librarian command. 
>|<|= Specified action is to be taken when the return code is: 
Greater than (>), 
Less than (<) or 
Equal to (=) 
the specified number. ; 
n Number (0 - 9999) with which the return codes are to be compared. 


Chapter 2. VSE/AF General Information 2-49 


Licensed Material - Property of IBM ® Copyright IBM Corp. 1985 


GOTO label or CONTinue Action to be taken if specified comparison matches: 
fee ea ee ee re ee Te oe ee ae ap ee ee 
[| PUnch [| mn.mt ...  [Format=0ld] [Eof={Yes|NO}] | 
Cee chs er ean eA a a a Re eI NE ere eA, 


The PUNCH command causes the contents of one or more members to be "punched" to 
the output device SYSPCH. 


mn.mt Members to be punched. (Members of type DUMP cannot be punched.) 

Format=01d Allows members to be transferred from a current library to a 
library of a pre-Version-2 format. 

Eof=Yes |No If EOF=YES is specified, an end-of-file indicator (/*) is written 
to SYSPCH. If EOF=NO is specified, no end-of-file indicator is 
written. 


.EOF=YES is the default. 


Se ee eS 
| RELease | [SPace] {Lib =l...} | 


{Sublib=1.s ...} | 
aga re nS ae OE a Nn Ne ee TES | 


The RELEASE command is needed when members have been deleted from a library or 
sublibrary which 


° is shared by two or more VSE partitions, or 
° resides on a disk device shared by two or more processors. 


The RELEASE command causes space to be released immediately, which was formerly 
occupied by deleted members, when the library or sublibrary is no longer shared. 


bPace may be coded as a reminder. 

Lib=1 Library where the space from deleted members is to be released. 

Sublib=1.s Sublibrary where the space from deleted members is to be 
released. 


Rees one cad we ag Racegs ey Eng we pe as Nee ee en pig gee ge ge EN ee Dw om aw faa 
| REName | {Sublib=l.s [:] l.s  ...} | 


| | {mn.mt f:] mn.mt ...} | 
fetes Pee See es Ee I aore  e So oe Sy 


The RENAME command changes the name and/or type of one or more members, or the 
names of one or more sublibraries. 


Sublib=l.s Old (first operand) and new (second operand) names of the 
sublibrary to be renamed. The library name from the first and 
second operand must be the same. (Not valid for system 
sublibrary IJSYSRS.SYSLIB.) 

mn .mt Old (first operand) and new (second operand) names and types of 
the members to be renamed. 


rr So 7 ig Re eae PR eee ig) 
| REStore r-spec Tape={SYSnnn}[LISt={Yes}] {ID={name}] [Replace={Yes}] | 
| {cuu {No }] {*  } {No } | 
[ ] 
| [Scan={Yes}] | 
| [ {No }] | 
} =] 
| Values for {Lib =1l [:1l] ..} | 
| xr-spec {Sublib=l.s [:l.s] at | 
| may be: {* } | 
| {l.s.mn.mt [:l.s] ..} | 
| {Oldlib=oldlib:[1.s] ...} | 
LU 


The RESTORE command causes the libraries, sublibraries, members or SYSRES files 
which were backed up using the BACKUP command to be restored to disk. 


Lib=1 Library to be restored. 

:1 New name for the library to be restored. 
Label and extent information must be given before the RESTORE 
command. 
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Sublib=1.s Sublibrary to be restored. 
A sublibrary can be restored only into an existing library. 

tl.s New target sublibrary. 

l.s.mn.mt Member(s) to be restored. They will be searched for in the 
sublibrary specified by 1l.s on the backup tape. 

:l.s specified members will be copied into this sublibrary, dependent 
on the REPLACE operand of the RESTORE command. 

* All libraries and sublibraries on the backup file are to be 
restored. 


Oldlib=oldlib Filename of a pre~-Version-2 format private library, to be 
restored as a sublibrary. 

Tape=SYSnnn|cuu Logical unit or device address of tape containing the backup 
file. 

LISt=Yes |No If LIST=YES, the names of restored libraries, sublibraries and 
members will be printed on SYSLST. If LIST=NO, listing will be 
suppressed. 

SCan=Yes |No If SCAN=YES, the restore function is not performed. 

SCAN=NO is the default 

ID=name |* Name of the backup file to be searched for. (1 to 16 characters 
enclosed in quotes.) With alphanumeric characters only, the 
quotes may be omitted. 

REPLACE=YES|NO Controis the merging of backed-up libraries, sublibraries and 
members into existing ones. 


The standalone version of the RESTORE function restores a single SYSRES file. 


| Test {Lib =1 ... [Area={Space} ][Repair={Yes}] } [Unit={SYSLST}] | 
| { {All } {No} } {SYSLOG} 

| {Sublib=l.s ... } | 
| {mn .mt } | 
| {Trace={Space|IO|Buffer|LEVEL1|LEVEL2|OFF]} } | 


The TEST command is used to check the structure and contents of a library or 
sublibrary for consistency and correctness, and to provide a trace function for 
librarian services at different levels. 


If TEST detects any inconsistency or incorrectness in a library, sublibrary or 
member, the librarian sets a return code of 2. 


To analyze a possible library problem, follow this procedure: 


1. Run TEST LIB=1 for the library suspected of causing the problem. 
2. If the TEST output does not show error lines, the problem was not caused by 
this library. 


If the TEST output shows errors, then: 

Run BACKUP and RESTORE for the library. 

Run TEST LIB=1 again for the same library. 

If the TEST output does not show error lines, the problem is probably 
solved. 


aAPw 


If the TEST output does show errors again, then: 
6. There is probably a system error. 


aS na oa a 
| Update | mn.mt [SAve=mn.mt] [SEquence={n }] [Column=start[:]end] | 
| | {FS} 


| {NO} | 
[Serra ee a a eS 


The UPDATE command allows you to modify the contents of a member by adding, 
deleting or replacing lines. 


mn. mt Member to be updated. 

SAve=mn .mt Unmodified version of the member is to be saved under the name 
and type specified. 

SEquence=n|FS|NO Controls the resequencing of the member being updated. 


n (decimal number from 1 to 999) increment between line numbers 
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which will be used for resequencing. The first line will be 
given the value n. 


FS fixed sequence; the current line numbers will not be 
changed. 


NO the order of records in the member will not be checked. The 
updates must be supplied in ascending order. Sequencing is not 
checked. 

SEQUENCE=10 is the default. 

Column=start:end Start and end of the sequence field in the member. May be’ | 
anywhere within the line (1 to 8 characters). The following are 
the defaults. Pp 

if SEQUENCE=n or SEQUENCE=NO COLUMN=77:80 if SEQUENCE=FS 
COLUMN=7 3 : 80 


UPDATE Subcommands 


fo 
| Operation | Operands 


| )ADD | seq-no 
a aS Seater ee Ura eaaeee nba =f 


The )ADD subcommand indicates that the lines following it are to be added to the 
member specified in the UPDATE command. 


seq-no Sequence number of the line after which new lines are to be 
added. To add new lines in front of the first line of the 
member, code 0 for seq-no. (Not possible if SEQUENCE=NO in the 
UPDATE command. } 


oe pa yee ea ee fy ay 
Operation | Operands 


Lecce 


| 
| )DEL | first-seq-no[[,]last-seq-no | *] 
[dt 


The )DEL subcommand causes the deletion of lines from the member specified in 
the UPDATE command. 


first-seq-no, last-seq-no Sequence numbers of the first and last lines of a 
section to be deleted. If last-seq-no is not 
specified, the line represented by first-seq-no is the 
only line deleted. To delete all lines from the line 
specified in first-seq-no to the end of the member, 
specify * in place of last-seq-no. 


= sa 
Operation | Operands 


71 
| | 
; ae --+| 
| | 


The subcommand )END has no operand. Issue it to inform the system that input for 
the required UPDATE function is complete. 


[een ee I a ee ee Se, ee ek tl 
| Operation | Operands | 


| )REP | first-seq-no[[,]last-seq-no | *] | 
Ee J 


The )REP subcommand indicates following lines are to replace existing lines in 
the specified member. 


first-seq-no,last-seq-no Represent the sequence numbers of the first and last 
lines of a section to be replaced. The first-seq-no 
must not be zero. To replace all lines up to the end 
of the member, specify * in place of last-seq-no. 
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gg auaeg ‘s 
label |. 


bye 


The LABEL command in conditional command streams marks a point up to which 
commands can be skipped using a GOTO command or the GOTO action of an ON 
command . 


pe OES fs Indicates a label. These characters must be in positions 1 and 2 of the 
: command followed by at least one blank character. 
w “ label Name of the label.(1 to 8 alphanumeric characters) 


Ra a | 
| /+ [comments ] | 
| 7 eral 


The End-of-Data statement for input to the librarian CATALOG command is /+. 


Column 1 contains a slash (/) and column 2 a plus sign (+). Column 3 must be 


eo blank. 

ow Format for SYSIPT: Format for SYSLOG: 
[ i I 
| /* | | END | 


| j H j 


These statements indicate to the librarian program that no more librarian 
commands follow. 

The SYSIPT format is used when a librarian job stream for batch execution is 
being prepared. 

The SYSLOG format is used to end an interactive librarian session at the system 
console. 
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EDITED MACRO SERVICE PROGRAM (ESERV) 


ESERV Control Statements 
These statements must start in or after column 2. 


If used, one of these statements must follow the EXEC ESERV statement directly. 


woe 


If neither is used, GENCATALS is assumed. f ok 
a i 
| Operation | Operands | oe 
| GENEND | none | 
bes i I 
This causes ESERV to place an END and a /* statement immediately after the 
de-edited macro on SYSPCH, so that it can be used as SYSIPT for the assembler. 
. 
i a 4 é 
| Operation | Operands | \ 
| 4 \ 
| GENCATALS | none | 
[ee ih J 
This causes a librarian catalog statement for a member "bookname.A" (or 
“bookname.D," if the OPTION SUBLIB=DF is in effect on the system) to be placed 
before each macro, and a /* to be placed after each macro. This allows the 
SYSPCH output to be used as SYSIPT for the librarian program to catalog the 
de-edited macro with the appropriate member type. 
Eo. | 1 
| Operation | Operands | 
| at | 
I 
| DSPLY | | 
| PUNCH | bookname.type[,bookname.type,...] 
| DSPCH | | 
l ao a 
These statements must follow the GENEND or GENCATALS statement. They can act on 
one or more edited macros in one ESERV run. 
The statements must start in or after column 2. 
DSPLY De-edits macros and displays them on SYSLST. 
PUNCH De-edits macros and punches them on SYSPCH. 
DSPCH De-edits macros, punches them on SYSPCH and displays them on 
SYSLST. er, 
bookname.type Member name and member type of the macro to be de-edited. fe \ 
i 
\, ; 
f TO ed Boy 
| Operation | Operands | 
| | 
| ) ADD | seq-no[+rel] | 
lL os cee J 
The ) ADD statement indicates that following source statement(s) are to be 
inserted at specified positions in the macro. 
seq-no Sequence number of the macro definition statement after which the new A 
source statements are to be inserted. (1 to 8 decimal digits) . 
+rel Position of the macro statement after which the new statements are to 
be added, relative to the statement specified in "seq-no"™ 
I i = ee 
| Operation | Operands | 
| +— aa 
| ) COL | startcol,n | 
Ll J J 
f \ 


The ) COL statement specifies the position of the sequence number within the , 
source statements of the de-edited macro. If used, it must immediately follow A 
the DSPLY, PUNCH or DSPCH statement to which it applies. 
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startcol Column in which the sequence number is to start. (73..80 - default is 


73) 


n Length of the sequence number. 


(1..8 - default is 6) 


rs le aS = SU ee 


| Operation | Operands 


Jp 


| ) DEL | first-seq-no[t+rel][,last-seq-no[+rel1] ] | 
Ue pe i a en LR aa a a a I ag ee 


The ) DEL statement causes deletion of one or more source statements from the 


de-edited macro. 


first-seq-no Sequence number of the first or only source statement to be deleted 
from the de-edited macro. 

last-seq-no Sequence number of the last of a series of source statements to be 
deleted from the de-edited macro. 

+rel Position of the first or last statements to be deleted, relative to 
the statement with the specified sequence number. 


ars rea 

| Operation | Operands 
} 

{ ) END | 


a 


none 


| 
| 
| 
2 


The ) END statement indicates the end of ESERV update or verify statements on 
SYSIPT. It is required in every update run. 


as ae Su on ee ee ee a ol 


| Operation | Operands 


| ) REP | first-seq-no[+rel][,last-seq-no[+rel]] | 
ke Se ne eS 


The ) REP statement indicates that the following source statements on SYSIPT are 
to replace one or more existing statements in the de-edited macro. 


first-seq-no Sequence 
replaced 
last-seq-no Sequence 
replaced 
trel Position 


if T 
| Operation | Operands 


number 
in the 
number 
in the 
of the 


| ) RST | seq-no[+rel] 
A 


of the first or only source statement to be 


de-edited macro. 


of the last of a series of source statements to be- 


de-edited macro. 


first or last statements to be replaced, relative 
to the statement with the specified sequence number. 


$j 


The ) RST statement causes the sequence numbers of the statements in a macro 
definition to restart at a lower number after the statement specified in the 


) RST operand. 


seq-no Sequence number of the source statement after which the new series of 
sequence numbers starts. 
+rel Position of the statement after which the new series of numbers is to 


start, relative to the statement with the specified sequence number. 


Rane 
| Operation | Operands 


[oa 
| ) VER | seq-no[+rel], len 
De a a ee 


The ) VER statement causes all or part of the specified source statement in the 
de-edited macro to be verified against the contents of the statement following 


) VER statement on SYS 


IPT. 
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seq-no Sequence number of the source statement to be verified in the 
de-edited macro. 


+rel Position of the source statement to be verified, relative to the 
statement specified in "seq-no." 


len Length of the field to be verified. (decimal integer; 1..80) 


Sample coding for. de-editing without updating a macro definition 


eos 


// JOB NOUPDATE 

// LIBDEF SOURCE ,SEARCH=(lib.sublib,....) 
// EXEC ESERV 

PUNCH E.MAC1,E.MAC2 


yep 


/* 
/& 
f 
Sample coding for de-editing and updating a macro definition Ms 
per 
| // JOB UPDATE 
| // LIBDEF SOURCE ,SEARCH=(lib.sublib,....) 
| // EXEC ESERV 
| GENEND 
| DSPCH E.MAC1 
| COL 77,3 
| VER 7241,5 
| .PP9 
| JADD 72+1 
| AIF (&PCH NE 1400)D4 
| )DEL 102,103 
| )REP 245 
| JOYCE CLC 0(4,REG6) ,BLANKS 
| JEND /* 
| // PAUSE CHECK LIST, MOVE DECK TO READER 
| // OPTION EDECK,NODECK 
| // EXEC ASSEMBLY 
| deck produced by ESERV | 
| // PAUSE MOVE SYSPCH DECK TO READER 
| // EXEC LIBR,PARM='ACCESS SUBLIB=lib.sublib' 
| deck produced by Assembler | 
| /* | 
| /& | 
t zi wf 
( 


ye 


LSERV: Display Label Information Area 


LSERV, a system utility program, produces a printout of the system's label 
information area. You invoke this program by entering: 


foe AS a 
| // EXEC LSERV | 


via the console or by submitting control statements as follows. 

> f 
| // JOB anyname | 

| // EXEC LSERV | 

| hg 

| /& | 

L J 


The output of LSERV shows the contents of the label area on SYSRES and is to be 
printed on SYSLST.rd Punch 


When and how to use LSERV: 
1. Operator action given in the Messages indicates when LSERV must be executed. 


2. LSERV can be used for error analysis. LSERV displays the TLBL, DLBL and 
EXTENT information. 
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Summary of information provided: 

The printout of LSERV will show you the following details: 

. Whether the correct DLBL/EXTENT information is still on the label area. 
: The permanent files. 

° The temporary files. 


. Extent type. 
° File type. 


LVTOC: Display Volume Table of Contents 


// JOB anyname 

// ASSGN SYS004,cuu (disk) 

// ASSGN SYS005,cuu (printer) 
// EXEC LVTOC 

/& 


aaa | 


Len eee as) 


A volume table of contents (VTOC) is an index of all files, and the remaining 
space, on a disk volume. 


A VTOC display can be requested by executing the LVTOC program with SYS004 
assigned to the applicable disk drive and SYSO05 to a printer. 


LVTOC lists the file labels contained in a VTOC in alphabetic sequence by file 
name. It also provides a listing of free space on the volume, with the start and 
end addresses and sizes of the unused space. The control statements needed to 
invoke that program may be submitted via SYSRDR or via the console. 
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LINKAGE EDITOR SUMMARY 


Format of the ESD Statement 


Card columns Content 
1 Multiple punch (12-2-9). Identifies this as a loader 
statement. 
2- 4 ESD -- External Symbol Dictionary statement. 
1i - 12 Number of bytes of information contained in this statement. 
15 - 16 External symbol identification number (ESID) of the first SD, 


PC, CM or ER on this statement. Relates the SD, PC, CM or ER 
to a particular control section. 

17 - 72 Variable information. 
8 positions 
1 position 


3 positions 
1 position 
3 positions 


Name 

Type code hex '00', .'01', '02', '04', '05', or 
'O0A' to indicate SD, LD, ER, PC, CM, or WX, 
respectively. 

Assembled origin 

Blank 

Length, if an SD-type, CM-type, or a PC-type. 
If an LD~type, this field contains the external 
symbol identification number Reet) of the SD 
containing the label. 


73 - 80 May be used by the programmer for identification. 


Format of the TXT Statement 


Card columns Content 
1 Multiple punch (12-2-9). Identifies this as a loader 
statement. 
2- 4 TXT -- Text statement. 
6 - 8 Assembled origin ta seees of first byte to be loaded from this 
statement). 
11 - 12 Number of bytes of text to be loaded. 
15 - 16 External symbol identification number (ESID) of the control 
section (SD or PC) containing the text. 
17 - 72 Up to 56 bytes of text -- data or instructions to be loaded. 
73 - 80 May be used for program identification. 


Format of the RLD Statement 


Card columns Content 
1 Multiple punch (12-2-9). Identifies this as a loader 
statement. 
2- 4 RLD -- Relocation List Dictionary statement. 
11 - 12 Number of bytes of information contained in this statement. 
17 - 72 Variable information (multiple items). : 
a. Two positions - (relocation identifier) pointer to the 


ESID number of the ESD item on which the relocation 
factor of the contents of the address constant is 
dependent. 

Two positions - (position identifier) pointer to the 
ESID number of the ESD item on which the position of 
the address constant is dependent. 

One position - flag byte indicating type of constant, 


as follows: 

Bits Setting and Meaning 

0-2 (ignored) 

3 0 - a nonbranch type load constant 
1 - a branch type load constant 

4-5 00 - load constant length = 1 byte 


01 - load constant length = 2 bytes 
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10 - load constant length = 3 bytes 
11 - load constant length = 4 bytes 


6 0 - relocation factor is to be added 
1 - relocation factor is to be subtracted 


7 0 - Next load constant has different 
R and P identifiers; therefore, 
both R and P must be present. 

1 - Next load constant has the same 
R and P identifiers; therefore, 
they are both omitted. 


The five significant bits of this byte are expanded in 
the RSERV printout. 
d. Three positions - assembled origin of load constant. 
May be used for program identification. 


Format of the END Statement 


Card columns 


17 


29 
73 


4 
8 
16 


22 


32 
80 


, 


Content 


Multiple punch (12-2-9). Identifies this as a loader 
statement. 

END 

Assembled origin of the label supplied to the assembler in the 
END statement (optional). 

ESID number of the control section to which this END statement 
refers (only if 6-8 present). 

Symbolic label supplied to the assembler if this label was not 
defined within the assembly. 

Control section length (if not specified in last SD or PC). 
Not used. 


Format of the REP (User Replace) Statement 


Card columns 


1 


2 
5 
7 


13 
14 


17 


71 
73 


16 


70 


72 
80 


Content 


Multiple punch (12-2-9). Identifies this as a loader 
statement. 

REP -- Replace text statement. 

Blank. 

Assembled address of the first byte to be replaced 
(hexadecimal). Must be right justified with leading zeros if 
needed to fill the field and must be equal to or greater than 
the starting address of the control section (columns 14-16). 
Note that there is no check to determine if the assembled 
address is actually within this control section. 

Blank. 

External symbol identification number (ESID) of the control 
section (SD) containing the text (hexadecimal). Must be right 
justified with leading zeros if needed to fill the field. 
From 1 to 11 4-digit hexadecimal fields separated by commas, 
each replacing two bytes. A blank indicates the end of 
information in this statement. 

Blank. 

May be used for program identification. 
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External Symbol Dictionary 


The external symbol dictionary (ESD) contains control section definitions and 
inter-module references. Six types of entries are defined in the control 


dictionary: 
ESD Type Definition 


SD Section definition: provides control section name, assembled 
origin and length. Generated by a named START or a named CSECT 
in a source module. 

WX Generated by weak external reference (WXTRN), which has a 
function similar to EXTRN, except that WXTRN suppresses’ 
AUTOLINK. The linkage editor treats WX as an ER, NOAUTO. 


PC Private code: provides assembled origin and length for an 
unnamed control section. 
LD/LR Label definition: specifies the assembled address and the 


associated SD of a label that may be referred to by another 
module. The LD entry is termed LR (Label Reference) when the 
entry is matched to an ER entry. 

ER External reference: specifies the location of a reference made 
to another module. ER is generated by EXTRN or a V-type 
address constant in a source module. 

CM Common: indicates the amount of storage to be reserved for 
common use by different phases. CM is generated by COM in a 
source module. 
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SUPERVISOR GENERATION MACROS 


SUPVR macro 


The SUPVR generation macro describes the system environment: 


ID= Supervisor Identification Character 
a MICR= Support for magnetic ink or optical character reader/sorter. 
° NO specifies no MICR support 
; : ° 1419 indicates support for 1419s with singel address adapter. 
° 1419D indicates support for 1419s with dual address adapter. 
MODE= 370|E|VM Specifies whether 370 or ECPS/VSE mode is supported. 


MODE=VM corresponds to the old specification MODE=E and VM=YES, and 
generates the VM linkage enhancement version with ‘DAT’ off. 

NPARTS= 5|n specifies the number of partitions to be supported. The minimum 
is 2, the maximum is 12. 


POPs FOPT macro 
d The FOPT generation macro describes the functional supervisor options: 


DASDSHR= NO|YES specifies whether disk sharing support is used or not. 

FASTTR= NO|YES specifies whether fast CCW translation is to be supported. 

RPS= NO|YES Support for the rotational positioning sensing (RPS) 
capabilities. 

TRKHLD= NO|n Specifies whether the Track Hold feature is to be supported for 
disk in a supervisor that supports multiprogramming. n indicates the 
maximum number of tracks/blocks to be held at any one time. (Accepted 
values are from 1 to 255). 

TTIME= NO|partition ID Specifies whether th timer is to be supported and if 
so, the partition owning the task timmer. Only one partition ID can 
be specified. 

USERID= id print supervisor ID at IPL completion. 


IOTAB macro 
The IOTAB generation macro describes installation requirements for I/0 tables: 


IODEV= 25|n Number of I/O devices attached to the system. The maximum 
specification is 254, the minimum is 4. Each unit requiring an ADD 
entry must be included in n. 

NPGR= 30|n Number of programmer logical units for all partitions. (Accepted 
values are from 30 to 255). 
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| | [PUBS] | 
| IPL | | Device | | 
| Device | | Type | | 
| Code | Actual IBM Device {| X'nn' | Device Type | 
| 7770 | 7770 Audio Response Unit | D3 | Audio | 
| 7772 | 7772 Audio Response Unit | D4 | Response | 
| | Units 
| 2501 | 2501 Card Reader | 10 | | 
| 2540R | 2540 Card Reader | 11 | Card Reader | 
{| 3505 | 3505 Card Reader | 12 | | 
| 1442N2 | 1442N2 Card Punch | 22 | | 
| 2520B2 | 2520B2 Card Punch | 20 | | 
| 2520B3 | 2520B3 Card Punch | 20 | Card Punch | 
| 2540P | 2540 Card Punch | 21 | | 
| 3525P | 3525 Card Punch | 23 | | 
fe 
1442N1 1442N1 Card Read Punch 30 
2520B1 2520B1 Card Read Punch 31 
2560 2560 Multifunction Card Machine 33 Card Read 


read/punch feature) 


| | | | 
| | | | 
| | | | 
3525RP | 3525 Card Punch (with optional | 32 | Punch | 
| | | | 
| | | | 
| | | | 


5425 5424 Multifunction Card Unit 34 
5425 Multifunction Card Unit 

4j— + 
| FBA | 3310 Fixed Block Storage Device | 90 | | 
| FBA | 3370 Fixed Block Storage Device | 90 | 
| FBA | 3370-2 Fixed Block Storage Device | 90 | | 
| 2311 | 2311 Disk Storage Device | 60 | | 
| 2314 | 2314 Disk Storage Device | 62 | | 
| 2314 | 2319 Disk Storage Device | 62 | | 
| 3330 | 3330 Disk Storage, Models 1 and 2 | 63 | | 
| | 3330-1 | | | 
| 3330B | 3330 Disk Storage Model 11 | 65 | | 
| 3340 [| 3340 Disk Storage (General) | 68 | Disk | 
| 3340 | 3340 Disk Storage without { | | 
| RPS feature | 69/64 | | 
| | 3344 Disk Storage w/o RPS feature | 6A | | 
| 3340R | 3340 Disk Storage with RPS feature | 69/6A_ | | 
| | 3344 Disk Storage with RPS feature | 6A | | 
| 3350 | Disk Storage | 67 | | 
| 3375 | Disk Storage | 6B | | 
| 3380 | Disk Storage | 6c | | 
a 
| 3540 | 3540 Diskette Input/Output Unit | 80 | Diskette | 
| 7443 | 7443 System Recording File | 88 | | 
— }——+ —______J 
| 3277. | 3277 Display Operator Console | BO | Display | 

| | 3284 Console Printer | BO | Operator 
| | 3286 (the MODE operand must be | | Console and | 
| | 3287 entered as X'02') | | Console | 
| | | | Printers | 
| 1050A | 3210 Console Printer Keyboard | 00 | Printer | 
| | 3215 Console Printer Keyboard | 00 | Keyboard | 
| | 3286-2 in Printer Keyboard Mode | 00 | | 
Ce a I 
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Device Type Codes (cont...) 


| | | PUB | | 
| IPL | | Device | | 
| Device | | Type | | 
| Code | Actual IBM Device | X'nn' | Device Type | 


3274-1D Control Unit, 
mode = X'05' 


| 2260 | 2260 Display Station | co | 

| 3277. | 3277 Display Station MODE operand | BO | Display | 
| C(local)| 3278 must be omitted) | | Station | 
| | 3279 | | | 
| 32778 | 3277 Display Station, attached in | Bo | | 
| (local)| 3278 Burst Mode to a Multiplexor | | | 
| | 3279 Channel (MODE operand must | | 

| be omitted) | | | 
| 3277 3277 Display Station, attached via | BO | | 
| | 

| | | 


| 
| 
| 


| 2400T7 | 2400 7-Track Magnetic Tape Unit | 50 | 
| 2400T9 | 2400 9-Track Magnetic Tape Unit | 50 | 
| 3410T7 | 3410 7-Track Magnetic Tape Unit | 53 | Magnetic | 
} 3410T9 | 3410 9-Track Magnetic Tape Unit | 53 | Tape | 
| 3420T7 | 3420 7-Track Magnetic Tape Unit | 52 | 

| 3420T9 | 3420 9-Track Magnetic Tape Unit | 52 

| 3430 | 3430 9-Track Magnetic Tape Unit | 53 | | 
| 8809 | 8809 Magnetic Tape Unit | 5A | | 


1419 1255 Magnetic Character Reader 72 | 
1419 1259 Magnetic Character Reader 72 | MICR 
1419 1419 Magnetic Character Reader 72 | (Magnetic 


| | | 

| | | 

| | | 

| 1419P | 1419 Dual Address Adapter | 73 Ink 
| | 

| | | 

| | | 


| 

| 

| 

| 

Primary Control Unit Character | 

1419S 1419 Dual Address Adapter 74 Recognition | 

Secondary Control Unit Device) | 

: ae 1 

| 3890 | 3890 Document Reader/Inscriber | 7E Reader/ | 

| 3895 | 3895 Document Reader/Inscriber + | 7D Inscriber | 

| 

{| 1287. | 1287 Optical Reader | 77 | 
| 1288 | 1288 Optical Page Reader | 77 
| 1419 | 1270 Optical Reader Sorter | 72 

| 1419P | 1275 Optical Reader Sorter | 73 Optical | 

| | Primary Control Unit | Reader | 

| 1419S | 1275 Optical Reader Sorter | 74 | 

| | Secondary Control Unit | | 
| 3881 | 3881 Optical Mark Reader | 11 

| 3886 | 3886 Optical Character Reader | 7¢ | | 


{| 3211 Printer | 
| 3203-4 Printer | 
| 3203-5 Printer | 
| 3262-2 Printer | 
| 3262-5 Printer | 
| 3262-12 Printer 

| 3289-4 Printer 

| 4245 Printer 

| | 


| 
| 
| 
| 
| Printer 
| 
| 
| 
4248 Printer 


1403 1403 Printer 40 
1403U 1403 Printer with UCS feature 42 
1443 1443 Printer 41 
3211 3211 same as PRT1 43 
3800 3800 Printing Subsystem 45 


Burster-Trimmer-Stacker (BTS) 


3800C 3800 Printing Subsystem with 45 
additional Character 
Generation Storage (CGS) 

3800BC 3800 Printing Subsystem with 45 


| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
3800B | 3800 Printing Subsystem with | 45 | Printer | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 


BTS and CGS 
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| | | PUB | | 
| IPL | | Device | | 
| Device | | Type | | 
| Code | Actual IBM Device | X'nn' | Device Type | 
Ppp 

| 3277. | 3284 Printer with 3277 or | BO | | 
| Clocal)| 3286  3274-1B Control Unit | | | 
| | 3287 (MODE operand must be | | | 
| | 3288 entered as X'01') | | | 
| | 3289 Printer with 3274-1B Control | | Terminal 

| | Unit (MODE operand must be | | Printer | 
| | entered as X'01') | | | 
| 3277B | 3284 Printer with 3277 or | BO | | 
| Clocal)| 3286  3274-1B Control Unit | | | 
| | 3287 (MODE operand must be | | | 
| | 3288 entered as X'01') | | | 
| | 3289 Printer with 3274-1B Control | | | 
| | Unit (MODE operand must be | | | 
| | entered as X'0i') | | | 
| | attached in burst mode toa | | | 
| | multiplexor channel | | | 
| 3277. | 3277 Printers attached via 3274-1D | BO | | 
| | 4550 Control Unit, mode=X'06' | | | 
= pp 
{| 2701 | 2701 Data Adapter Unit | Do | | 
| | 2715 Data Adapter Unit {| DO | { 
| 2701 | Model Integrated Communication | DO | | 
| { 135 Adapter (ICA) | | Tele- | 
| 2702 | 2702 Transmission Control Unit | Di | processing | 
| 2703 {| 2703 Transmission Control Unit | D2 | Lines | 
| 2703 | Model Integrated Communication | D2 | | 
| | 138 Adapter (ICA) | | | 
| 2703 | 4331 Communication Adapter (ICA) { D2 | 

| | for BSC or Start/Stop lines | | | 
| 2703 | 3704 Communications Controller | D2 | | 
| | 3705 in Emulation Mode | | | 
| 3704 3704 Communications Controller | DC | | 
| 3705 | 3705 Communications Controller { DC | | 
| 3705 4331 Communications Adapter (ICA) | DC | | 
| | for SDLC Mode=x'10' | | | 
| 3725 | 3725 Communications Controller | DC | | 
| 3791L 3791 Local Communications | DE | | 
| | Controller | | | 
| 3791L 3274-1A Local Communications Contr. | DE | | 
oe a 
| UNSP | Unsupported Device | FF | Unsupported | 
| UNSPB | Unsupported Device (burst) | FF | Device 

| eee eee | posmeeresl ea = } 
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DISK-, DISKETTE-, AND TAPE-LABELS 


Standard volume labels on disk 


Standard Volume Label 1 Fields (Disk) 


Ese oe Wem At =e eed? os ae So Ot! oeey oS oe Do a sey wk S  —~ =<" | 
|Displ.|Field|Length| Content } 
0 Kl 3 Identifier: VOL. IOCS checks whether a 


VOLUME Label is present on 
the volume. 


| | | | | 
| | | | | 
| | | | | 
| | | | | 
| 3 | K2{ 1 | Volume Label No. VSE supports only VOL1. | 
‘a | | | 
{ 4 | Di | 6 | Volume serial number provides a unique | 
| | | | identification for the volume. | 
| | | | It is generally assigned when the volume is | 
| | | | first received in the installation. | 
| | | | The source of information is the EXTENT | 
| | | | statement. | 
| | | | IOCS checks the Serial No. given in the | 
| | | | EXTENT statement against this field. 

| | | | If no Serial No. Operand is specified in | 
| | | | the EXTENT Statement IOCS assumes the | 
| | | | correct volume mounted. | 
| | | | | 
| A [| D2{ 1 | Security byte used by OLTEP | 
| | | | | 
| B [| D3 { 5 | VIOC address. Contains the address of the | 
| | | | Format—4 label. | 
| | | | ( OCCHH for CKD or OBBB for FBA )} | 
| | | | This address is written at initialization | 
| | | | time. | 
| | | | | 
{ 10 [| D4 { 5 | Blank | 
| | | | | 
; 15 | D5 | 4 | Ci-size for FBA, blanks for CKD | 
| | | | | 
| 19 | D6 | 4 | Number of blocks per CI for FBA, blanks for CKD | 
| | | | | 
i 1D | B7 | 4 | Number of labels per CI for FBA, blanks for CKD | 
| | | | | 
| 21 | D& | 4 | Blank | 
| | | | | 
| 25 | D9 | E | Owner code for LVTOC listing | 
| | | | | 
| 33 | Dio | 1D | Blank | 


Ms ee ed 


Note: 


K. Fields = Key Fields 
D. Fields = Data Fields 
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Crs-=- Tot can 
|Displ. |Field|Length| 


0 


2C 


2D 


33 


35 


38 


3B 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
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| 
| 


IBM-Standard Disk File Label (Format-1) 


Kl 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


D1 


D2 
D3 


D4 


DS 


D6 


D10A 
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D10B 


2c 


2 
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| 
| 
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Content 


File-ID: 1-35 bytes if generation number (Gnnn) 
and version number (Vnn) are specified, 
else 1 to 44. 


Source of Information: 
DLBL or IOCS 

VSAM catalog routines, 
AMS DEFINE command. 


Processing: 

The File-ID may be specified in the 
DLBL-File-ID field, if this specification 
is omited, IOCS uses the DTF-name specified 
in the DLBL-filename-field (stored in the 
key area of the label record) to search 
(on input) in the VTOC key areas 

for the file entry. 

Under VSAM a data space name 

(VSAM catalog routine) or the name of an 
index or data is the contents (AMS DEFINE 
Stmt. or generated by VSAM). 


Format ID: 1. Written (on output) and checked 
by IOCS to distinguish this label from the 
other types (Format 2-5). 


Volume serial no.: numeric identification for 
the first volume of the file. 
Written by IOCS on output. 


Volume sequence number within the file to 


identify the volume in an multivolume file. 
Written (on output) and checked by IOCS. 


Creation date: yyddd. By IOCS from SYSCOM (on 
output), checked against label record (DLBL) 
on input. The actual year may be calculated 
by adding yy to 1900. 

Expiration date indicates when the data record 
is considered inactive. (Same format as 


creation date.) 


Source: DLBL, IOCS, AMS or System (creation 
date + 7 by default). 


Number of extents of the multi extent file on 
this volume. 


Used by OS/VS 

Reserved 

System code: indicates the Programming System 
which has written the file. 
IBMDOSVS is the code written by IOCS if DLBL 
is used. 


Date of last access: yyddd; not used by VSE 


Reserved 


Number of blocks per CI for FBA, blanks for CKD 
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IBM-Standard Disk File Label (Format-1) (cont...) 


a ae a T T 
|Displ. |Field|Length| 


Content 


| 
| 
=| 
File type: hex 0008 for VSAM 
hex 2000 for DAM 
hex 4000 for SAM (default, field in 
DLBL omitted) 


hex 8000 for ISAM 
Checked against type of DTF on input. 
Written from DLBL by IOCS on output. | 
Record Format: Used by OS/VS. IOCS writes 0 | 


Flags for optional areas used for ISAM file: 
Bit 2: Master index 
Bit 3: Independent overflow area 
Bit 4: Cylinder overflow area 

From DTF and EXTENT 


Byte length of ISAM blocks, from DTF 


Record length of ISAM files. From DIF 


Key length of ISAM blocks. From DTF 


Key field location in ISAM block. From DTF 


Flags: Bit 0: Last volume (SAM only) 
Bit 3: File security. From DLBL 


Original space request was: 
Bit 1: in blocks 


4: for continuous extent 
5: for maximum continuous extent 
6: not under specified minimum 


Used by OS/VS. IOCS writes blanks. 


Used by OS/VS. IOCS writes zeros. 


Start of next record to end—of-—data distance 
(negative displacement). 


Type of extent: Categorie of records | 
(from EXTENT) 
O01: (prime) data area or data space extent 
(default) | 
02: independent overflow area extent | 
04: master/cylinder index area extent | 
40: extent for user-standard labels 
80: split cylinder extent (SAM) 


Sequence number of extent in the file. 
From EXTENT or IOCS 


Extent lower limit (cchh for CKD, bbbb for FBA) | 


Extent upper limit (cchh for CKD, bbbb for FBA) 


Type of first additional extent (if available): 
Categorie of records (from EXTENT) — see D22 


Sequence number of extent in the file. 
From EXTENT or IOCS 


Extent lower limit (cchh for CKD, bbbb for FBA) 


Extent upper limit (cchh for CKD, bbbb for FBA) 
rs | 


} 52 | Dili | 2 

| | | | 

| | | | 

| | | | 

| | | | 

| | | | 

| | | | 

| 54 | D12 | 1 | 

| 55 | Di3 | 1 | 

| | | | 

| | | | 

| | | | 

| | | | 

| | | | 

| 56 | D14 | 2 | 

| 58 | D15 | 2 

| SA | D16 | 1 ‘| 

: 5B | D17 | 2 : 

| 5D | D18 | 1 

| | | | 

| | | | 

| SE | Dig | | 

| | | | 

| | | | 

| | | | 

| | | | 

| | | | 

| 5F | pasa 3 | 

| 62 | D20 | 5 

| 67 | D21 | 2 | 

| | | 

| | | 

| 69 | D22 | 1 | 

| | | | 

| | | 

| | | 

| | 

| | | 

| | | 

| | 

| | 

: 6A | D23 1 

| | 

| 6B p24 | 4 

! 6F | D25 | 4 

| 73 | D26 : 1 

| | 

| 74 D27 | 1. 

| | | | 

| | | 

| 75 | papi 4 | 

| 79 : D29 | 4 : 

Gs pa pen | 
3-4 
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IBM-Standard Disk File Label (Format-1) (cont...) 


i 1 Ste 1 
|Displ.|Field|Length Content | 
Pp — 
| 7D | D30 | 1 | Type of second additional extent (if available): | 
| | Categorie of records (from EXTENT) — see D22 | 
| | | | 
{| 7E | D3l 1 | Sequence number of extent in the file. | 
ge Se | | | From EXTENT or IOCS | 
| | | | 
vw | 7F | D32 4 | Extent lower limit (cchh for CKD, bbbb for FBA) | 
| | | | | 
| 83 | D33 4 Extent upper limit (cchh for CKD, bbbb for FBA) | 
| | | | 
| 87 | D34 5 Address of next label for the file | 
| | | on this volume. Written and used by IOCS. | 
t L ! mae ! 
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IBM-Standard Disk File Label (Format-2) 


|Displ. |Field|Length| 


| 
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24 


2¢ 


2D 
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| 
| 
| 
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Content 


Key code for continuation label (X'02') 
written by I0CS 


Used by OS/VS 
Used by OS/VS 
Used by OS/VS 
Used by OS/VS 


Reserved 


Last prime track address on the last prime 
cylinder. ( CCHHR ) 


Format ID: Checked by IOCS to distinguish this 
label from the other types (Format 1 and 3-5) 


Number of Index levels 

1 = Cylinder Index 

2 = Cylinder Index and Master Index binary 
Used by OS/VS 
First Data Record in Cylinders (HHR) 


Last Data Track in Cylinders (HH) 


Used by OS/VS 
Highest 'R' on High level Index tracks 
Highest 'R' on Prime Data tracks 


Highest 'R' on Overflow tracks 


'R' of last Data Record on shared tracks 


'R' of last Data Record on unshared track 


Highest 'R' on Independent Overflow track 


‘TAG deletion count 


Passed by VSE between Format-2 label and DTF. 
Used along with fields D13, D16, D27, D28, 
and D29. 
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IBM-Standard Disk File Label (Format-2) (cont...) 


(> >. thao oho= pes. Se Se Se ee 
|Displ. |Field|Length| Content | 


3D D13 3 Non-first Overflow reference count 
Passed by IOCS to accumulate this count in 
FILENAMER during retrieve operation. 


Used along with fields D12, D16, D27, D28, 


| | | | | 

| | | | | 

| | | | | 

= Roope ie. 4 | 

ee EN | | | | and D29. | 

hes ad er oe | 

| 40 {| D146 | 2 | Number of bytes for highest level Master Index | 

| | | | 

{ 42 | D1i5 | 1 | Number of tracks for highest level Master Index | 

| | | | 

| 43 | D16 | 4 | Prime record count | 

| | | | Used along with fields D12, D13, D27, D28, | 

| | | | and D29. | 

| | | | | 

—— } 47 | bD1i7 | 1 | Status (Codes for filled area) | 

/ | | | | If on, bits have fcllowing meaning: | 

feo peas | | | | Bit 2 -— File has been successfully closed | 

| | | | Bit 6 — Last tack full | 

| | | | Bit 7 — Last block full | 

| | | | Otherwise each bit is off | 

| | | | 

| 48 | D18 | 7 | Address of Cylinder Index (MBBCCHH) | 

| | | | M = Extent Sequence Number | 

| | | | | 

| 4F | dig | 7 | Used by OS/VS | 

| | | | | 

| 56 | D20 | 7 | Used by OS/VS | 

| | | | | 

| 5D | D21 | 8 | Last Prime Data Record Address (MBBCCHHR) | 

| | | | M = Extent sequence number | 

| | ae | 

| 65 | D22 | 5 | Last Track Index Entry Address (CCHHR) | 

| | | | 

| 6A | D23 | 5 | Last Cylinder Entry Address (CCHHR) | 

| | | | | 

| 6F | D24 | 5S | Last Master Index Entry (CCHHR) | 

| | | | | 

| 74 | p25 | 8 | Last Independent Overflow Record Address | 

| { | | (MBBCCHHR) — M = Extent sequence number | 

| | | | | 

| 7¢ | p26 | 2 | Used by OS/VS | 

| | | | | 

iat he | 7E | D27 | 2 | Number of Independent Overflow Tracks | 

4 ‘ | | | | Used by IOCS on ADD operations to update the | 
he ot | | | | count in FILENAMEI. Used along with fields 

| | | {| D12, D13, D16, D28, and D29. | 

| | | | 

| 80 | D28 | 2 | Overflow Record Count — IOCS accumulates this | 

| | | | count on ADD operations into FILENAMEO. Used | 

| | | | along with fields D12, D13, D16, D27, and D29. | 

| | | | 

{| 82 | D29 | 2 | Cylinder Overflow Area Count — IOCS accumulates | 

| | | | this count on ADD operations into FILENAMEA. | 

| | | | Used along with fields Di2, D13, Dl6, D27,_ —s=| 

| | | | and D28. | 

| | | | | 

; 84 | D30 | 3 | Dummy Track Index Entry (HHR) | 

| | | | | 

| 87 | D31 | S | Used by OS/VS | 


eee Lennie a a 


Chapter 3. I0CS (General) 3-7 


Licensed Material - Property of IBM 


IBM-Standard Disk File Label (Format-3) 
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T T 
ispl.|Field|Length| 


f T 
D Content 
on 
| oO [| Ki | 4 | Key code for continuation label (03030303) 
| | | | Written by IOCS 
| | | | 
| 4 [Ke Sy aa | Type of extent, from EXTENT: 
| | | | 01 = data extent (default) 
| | | | 80 = split cylinder extent 
| | | | 
| 5  |Kk3 | 1 | Extent sequence number (3 or more) 
| | | | 
| 6 | k4& | 4 | Extent lower limit (cchh for CKD, bbbb for FBA) 
| | | | 
| A | KS5 | 4 | Extent upper limit (cchh for CKD, bbbb for FBA) 
f J } a Besien 
The fields K2 to K5 are repeated three times as K6 — K17, to 
describe the extents 2, 3, and 4 of the key area. 
re aa | T T 
2c {| Di | 1 | Continuation label code: EBCDIC 3, from IOCS 
sf cll { ee 


The fields K2 to K5 are repeated 


nine more times as D2 — D37, 


to describe the nine extents of the data area. 


ES T fers 
87 | D38 | 


| | 
i eet eens 


5 | Address of next contin.label (cchhr or Obbbb) 
| or zeros. From SAM IOCS only 


| Ree eee Deyperrae eS Oe SE one eae (rece IeE ae Se OMe ap eee ve ORES SPEND | 


3-8 IBM VSE/Advanced Functions Handbook 


Licensed Material - Property of IBM © Copyright IBM Corp. 1985 
VTOC Label (Format-4) 


Every field in this label, except the VSAM indicators (D9A), is 
written by DSF at initialization time. 


oe Nas er ad ee be ee ee ee ge ye ee ee 
|Disp. |Field|Length| Content | 
—— 
| o | K1 | 2¢ | Key code for VTOC label: 44 times 04 | 
| | | | | 
| 2c | Di | 1 | VIOC label identifier: EBCDIC 4. | 
| | | | | 
L.2p 4 D2 1 45 | Used by 0S/VS | 
| | | | | 
| 32 | D3 | 2 | Number of available file label spaces | 
| | | | in VTOC at initialization (tracks x cylinder | 
| | | | minus 2) | 
| 34 | D& | 4 | Address of next alternate track (cchh), | 
| | | | for FBA: zeros. From DSF | 
| | | | | 
| 38 | DS [| 2 | Number of alternate tracks left. For FBA zeros | 
| | | | From DSF | 
| | | | | 
| 3A | Dé | 1 | Flags: Bit 0: always on 
| | | | Bit 3: Volume reserved for emulators | 
| | | | Bit 5: VTOC being updated by VSAM | 
| | | | | 
3B | D7 | #1 | Extent count. Always 1. VTOC is 1 extent | 
| | | | 
3c. 6| D8lUf 2 Reserved | 
| | | 
| 3E | D9 | E CKD device constants: (FBA: zeros) | 
| 3E | {| 2 | Number of cylinders | 

40 | | 2 | Tracks per cylinder 

42 | | 2 | Track length | 

44 | je Overhead bytes for I* 

45 | [i “2 Overhead bytes for L* | 
| 46 | ae Overhead bytes for K* | 
| 47 | | 1 | Flag byte | 
| | | | Bit 4: I or L value* has two bytes for 3350 | 
| | | | Bit 7: A tolerance is added to each record | 

| | except the last on a track | 

| 48 | | 2 | Tolerance** per device type | 
4A | ft Number of labels on VTOC track | 

| 4B {| 1 | Reserved | 
| | | | 
4c | DIA | B VSAM indicators, from VSAM catalog routines | 
4c | | 8 | Time when last data space was added | 

54 | fd | Ownership byte: Bit 0: Owned by VSAM catalog 

55 | | 2 Number of first track of CKD catalog recovery 

| | area, for FBA zeros 
| 57 | Dioal 9 Used by 0S/VS 
| | D10Bj Used by 0S/VS 

60 | Dioc| 4 Number of first block of FBA catalog recovery 

| | | area, for CKD zeros 

64 | DIOD| 5 | Reserved | 

| | | { 

| 69 | Dil { 1 Extent type: 01 for VTOC extent 

| 
6A | Di2 | 1 Extent sequence number: 00 (VTOC has 1 extent) 

| | 
6B | D13 | 4 | Start address of VTOC (label). 

| | | | 
6F {| DI4 | 4 End address of VTOC. Used by IOCS 

| 

73 | Dis | 19 Zeros 
|E=oowes iL L 1 

*) I = for a record with key area 

L = for a last record with key area on a track 
| K = for a key area 

**) The tolerance is added to the length of a record if bit 7 in 

the flag byte is on. 
Ge ee 
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User-Standard Disk File Labels (Header and Trailer) 


|Disp1.]Field|Length| 


D 


1 


2 


3 


3 


1 


| 
| 
| 
| 
| 
| 
| 
1 | 
| 
| 


| 
| 
| 
| 
| 
{| 3 
| 
| 
| 
| 


4C 


Content 


© Copyright IBM Corp. 1985 


UHL or UTL (User—header or User-—trailer label) 


Label sequence number: 1 t 
0 to 


o 8 for header labels 


7 for trailer labels 


Label sequence number: 1 to 8 for all 


| 
| 
| 
| 
UHL or UTL (User—header or User—trailer label) | 
| 
| 
| 
| 


User's label information 


LS see ae aa rnc ece ESN a Ay a LN OE eee | 


Volume Labels on Diskette 


|Displ.|Field|Length| 


0 


3 


D1 
D2 
D3 
D4 


DS 


{ 
| 
| 
| 
| 
| 
| 
| 
| 
| D6 
| 
| 
| 
| 
| 
| 


3 


| 
| 
| 
| 
| 
| 
| 
"4 
1a | 
| 
| 
| 
| 
| 
| 
| 


Content 
Label ID: VOL 


Must contain a l. 


Volume serial number from EXTENT 


Accessibility indicator: S o 


Reserved 


Name or code of volume owner 
Reserved 


Label standard level: W 


x Blank. From DTF 


eS Leer Pes Ee! x8 Ze PP a ef 


A diskette volume has one volume label of 80 bytes. 
sector 7 and begins by VOL. 
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a. 
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IBM-Standard File Labels on Diskette 


if so thaantul.- tof =) oe fe ates Fl hmm ne 
|Displ.|Field|Length| Content | 
{ o {bi | 3. { Label ID: HDR | 
| | | | 
| 3 |D2 | 1 | Label sequence number: 1 | 
pk | | | | | 
‘ | 4 |D3 | 1 | Blank | 
- | | | | | 
‘ | 5 | D4 | 8 | File-ID from DLBL or system | 
| p {ps | 9 | Blanks | 
| | | | | 
| 16 | D6 {| 5 | Record length. From I0CS 
| | | | 
{| 1B =| D7 | 1 | Blank | 
| | | | | 
as } 1¢ | D8 | 5 | Start address of extent: Track and sector. | 
: \ | | | | From IOCS ( CCHRR ) | 
_— ce Med 2 4 | 
— | 21 |p9 | 1. | Blank | 
| | | | | 
{ 22 | pio | 5 | End address of extent: Track and sector. | 
| H | | From IOCS ( CCHRR ) | 
| | | | 
| 27. | Dl1 | 1 | Blank | 
| | | ee | 
{| 28 |bD12 | 1 | Bypass byte: B or blank: B = job ends on input | 
| | | | | 
| 29 {| D13 | 1 | Security byte: S or blank | 
| | | [ | 
| 26 | D114 | 1 | Write protection byte: P or blank | 
| | | | | 
| 2B | DIS | 1 | Interchange level: blank= sector length 128, | 
| | | | unblocked, unspanned, sequential | 
| | | | non—blank= job ends on input | 
| | | | | 
{| 2c | D16 | 1. | Volume byte: | 
| | | | blank = file complete on this volume | 
| | | | C = file continued on next volume | 
| | | L = file ends on this volume | 
| | | | | 
| 2D | D17 | 2 | Volume sequence number | 
| | | | 
| 2F | pis | 6 | Creation date: YYMMD | 
ae | | | | | 
7 \ | 35 |pbi9 | D- | Blanks | 
‘4 y | | | | | 
— | 42 | D20 | 6 | Expiration date: Default= 7 days after output | 
Wa Waadleys er | 
| 48 | D21 | 1 | Verify byte: V or blank | 
| | | | | 
| 49 | p22 { 1 ‘| Blank | 
| | | | | 
| 44 | D23 | 5 | End of data address ( CCHRR ) | 
wos Pa wee. 4 | 
| | 4F | p26] 1 | Blank | 
ae Sa 
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Volume Labels on Tape 


The volume label for tapes is 80 bytes long and begins by VOL1 for the first 
volume label. Additional volume labels are ignored by VSE. 


Tape Volume Label for EBCDIC Code 


|Displ.|Field|Length| 


PO eh SBS ee A 
| | | | 
eM Bele a il] 
| | | | 
} 4 | BFt 6 4 
| | | | 
| A | D&] 12 | 
| | | | 
| B | DS | IE | 
| | D7 | | 
| | | | 
} 29 | pel aA | 
| | | | 
| 33 | D9 {| iw | 


Content 


Label ID: VOL 
Ignored by VSE 
Volume serial number 
Ignored by VSE 


Reserved 


Volume owner name or code 


Reserved 


a PS aya Pe LY 


hn Se i ee 


Tape Volume Label for ASCII Code 


|Displ. |Field|Length| 


ee 
| 3 | b2{ 1 | 
| | | | 
4 | D3 | 6 | 

A | D4 | 1 | 

B | ps | 1A | 
ed 
25 | D7 | E | 
33 | D8 | 1c ! 
4F | bo | 1 | 

| | | 


et 


Content | 
Label ID: VOL 
Ignored by VSE 
Volume serial number 


Accessibility 


Reserved 


Name or code of volume owner 
Reserved 


Standard byte: 1= file has ANSI standards 
blank= file does not have ANSI standard 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
acl 
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IBM-Standard File Labels on Tape 


© Copyright IBM Corp. 1985 


IBM-standard file labels are 80 bytes long. Zach file has a header and a trailer 


label which have the same format, for reading the tape forward or backward. 
The first four characters of each label identify the particular label: 


header label 
trailer label -- EOF1,EOF2 at the end of a file 
EOV1,EOV2 at the end of a volume 


-- HDR1, HDR2 


but not of the file 


HDR2, EOF2 and EOV2 for ASCII only. 


Additional labels (HDR3 to 8) are ignored by VSE. 


IBM-Standard Tape File Label for EBCDIC Code 


es Ses 


T T =r 
Displ.|Field|Length Content 
+ es 
o | obi | 3 | Label ID: HDR, EOF, or EOV 
| | 
3 | d2 1 Label sequence number: 1 
| | | 
| 4 | p3 ] 21 | File-ID from TLBL 
| | 
LS | D4 6 Volume serial number of the volume where 
| the file begins 
| | | 
1B. 0S |)«6©D5 |)6 64) «6 |: «Volume sequence number within the file 
| 
1F | D6 4 File sequence number on the volume 
| | 
23 | D7 | 4 Version number of the file 
| 
27 ~+| D8 2 Sub-version number 
| | | | 
{| 29 | D9 | 6 | Creation date: cyyddd 
| | c indicates the century, blank=19, 0=20, 1=21 
| 
2F =| Dio 6 Expiration date: cyyddd 
| | | 
35 | Dil} 1 Ignored by VSE 
| 
36 | Di2 6 Number of blocks; used in trailer labels only 
| | | 
3c)—0Ud «df DIB |~ OCD System code: IBMDOSVS 
| 
49 | D14 7 Reserved 
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IBM-Standard Tape File Label for ASCII Code 


|Displ. |Field|Length| Content | 

| o | D1 {| 3 | Label ID: HDR, EOF, or EOV | 

| 3 | D2 | 1 | Label sequence number: 1 | 

| 4 | D3 | 11 | File-ID from TLBL | f— 
| 15 | D4 6 | Volume serial number of first volume of the ae \. 
| 1B D5 | 4 | Volume sequence number within the file | | 
| 1F | D6 | 4 | File sequence number within volume(s) | 

| 23 | D7 | 4 | Version number of the file | 

| 27 | D8 | 2 | Sub-version number | C 
| 29 | Dg | 6 | Creation date: cyyddd — c indicates the eee 1 

be | | | X'40'=19, X'FO'=20, X'F1'=21 | NG 

| 2F | D10 | 6 | Expiration date: cyyddd 

| 35 | Dil | 1 | Accessibility byte | 

| 36 | D12 | 6 | Number of blocks written; only in trailer label | 

| 3C | D13 | D | System code: IBMZLB followed by two blanks | 

| 49 | D14 | 7 | Reserved | 


User-Standard File Labels on Tape 


|Displ. |Field|Length| Content | 
{ o | Di | 3 {| Label ID: UHL or UTL | 
| 3 | D2 | 1 | Label sequence number: 1 to 8 | 
| 4 | D3 | 4C | User's label information | 


a a aa a 


User-standard labels are header labels located and processed before the data of 
the file, and trailer labels located and processed after the file. Header and 
trailer labels are identified by: = 


fo 


User header labels UHLn 
User trailer labels UTLn 


n may be 1 to 8. 
User-standard file labels are 80 bytes long. The first four bytes contain UHLn 
or UTLn and the remaining 76 bytes contain user data. a“ 
Non-Standard File Labels on Tape 
Non-standard labels are only supported on EBCDIC code tape labels. They may have 
any length, do not have a specified identification in the first four characters, 
and do not have a fixed format. They may contain whatever information the user 


desires, and in any arrangement. They are completely the responsibility of the 
user. 
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DATA MANAGEMENT AND SYSTEM CONTROL MACROS 


Declarative Macros 
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| Name |Operation| Operands | Description | 
| [mame] | CDMOD | [CONTROL=YES] | Defines a logic| 
| | | [,CRDERR=RETRY] | module for a | 
| | | [,CTLCHR={ASA| YES}] | card reader | 
| | | [,DEVICE=nnnn] | file. | 
| | | [,FUNC={R|P|[1I|RP|RW|RPW|PW}] | | 
| | | [,ITOAREA2=YES] | | 
| | | [,RDONLY=YES] | 
| | | [,RECFORM={FIXUNB | VARUNB | UNDEF} ] | | 
| | | [,SEPASMB=YES] | | 
| | | [,TYPEFLE={ INPUT|OUTPUT|CMBND}] | 
| | | [,WORKA=YES} | | 
- —4 4 + 
| [name] | DFR | FONT=code | Defines attri- | 
| | | [,BCH=n] | butes common to| 
| | | [,BCHSER=n] | a group of line| 
| | | [,CHRSET=n] | types on a | 
| | | [,EDCHAR=(x,...)] | D/T 3886. | 
| | | [,ERASE={NO|YES}] | | 
| | | {,NATNHP={NO| YES} ] | 
| | | [,REJECT=x] | | 
{name} | DIMOD [ IOAREA2=YES] | Defines a logic| 
[ ,RDONLY=YES ] | module for a | 
[ ,SEPASMB=YES ] | device-indepen-| 
[, TRC=YES ] | dent file | 
[ ,TYPEFLE={ OUTPUT | INPUT} ] | | 
—+— — 
[name] | DLINT LFR=n , LINBEG=n Describes line | 


/_—+—__}—_-- 


| 
| 
| 
| 


[name ] 


| 
| 
| 
| 


DRMOD 


[ , INAGE={NO]| YES} ] 

[ ,NOSCAN=(n,...)] 

[ ,FLDn=(n,NCRIT, xxx) ] 

{ ,EDITn=(xxxxxx , EDCHAR) ] 


| 
| 
| 
| 
| 
| 
| 
| 
| [,FREND={NO| YES} ] 


types, fields | 
in the line. | 


| [DEVICE=3886] 
| [,RDONLY=YES ] 
| [,SEPASMB=YES] 
| [,SETDEV=YES] 


| DEVADDR=SYSxxx 
| , IOAREA1=name 

| [,ASOCFLE=filename] 
| {,BLKSIZE=n] 

| [,CONTROL=YES] 
| [,CRDERR=RETRY ] 
| [{,CTLCHR={ASA| YES} ] 
| {,DEVICE=nnnn] 
| [,EOFADDR=name]} 
| [ ,ERROPT={ IGNORE | SKIP| name} } 
| [,FUNC=xxx] 

| [, IOAREA2=name ] 
| [{,IOREG=(r)] 

| [,MODE=xx] 

| [,MODNAME=name] 

| [,OUBLKSZ=n] 

| [,RDONLY=YES] 

| [,RECFORM={FIXUNB | VARUNB | UNDEF} ] 
| [,RECSIZE=(r)|name] 

| [,SEPASMB=YES] 

| [,SSELECT=n] 

| [, TYPEFLE={ INPUT | OUTPUT | CMBND} ] 
| [,WORKA=YES] 


| 
| 
| 
| | 
| | 
| 
| 
| 
| 


Defines logic | 
modules for a_ | 
3886 file. | 

| 


Defines a card 
or 3881 file. 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


Na i A 
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Declarative Macros (cont...) 


ay 


3-16 


eal | 


Operands 
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Pee ee eee pe og oy 


T 
Name |Operation 

| DTFCN | 
| 
| 
| 


[name 


] 
| 
| 
| 
| 
| 
| 
| 
| 


[name] 


DEVADDR=SYSxxx 

» LOAREA1=name 

[ , BLKSIZE=n] 

[, INPSIZE=n] 

[ ,;MODNAME=name } 

[ ,RECFORM={FIXUNB | UNDEF} ] 
[,RECSIZE=(r) } 


| [,TYPEFLE={ INPUT | OUTPUT | CMBND} ] 


[ ,WORKA=YES] 


DEVADDR=SYSxxx 

» BLKSIZE=n 

» ERRBYTE=name 

, LOAREAI=name 

» SEEKADDR=name 

> TYPEFLE={ INPUT | OUTPUT} 
[, AFTER=YES ] 

{ ,CONTROL=YES ] 

[ ,DEVADDR=SYSxxx] 
{ ,DSKXTNT=n} 

[ ,ERREXT=YES ] 

[ ,FEOVD=YES ] 

[ ,HOLD=YES ] 

{, IDLOC=name] 

[ ,KEYARG=name] 

[ ,KEYLEN=n ] 

[, LABADDR=name ] 

{ ,READID=YES ] 

[ , READKEY=YES } 

{ ,RECFORM=xxxxxx] 
[ ,RECSIZE=(r) } 

{ ,RELTYPE={DEC | HEX} ] 
[, SEPASMB=YES } 

{ ,SRCHM=YES ] 

[, TRLBL=YES } 

[, VERIFY=YES ] 

[ ,WRITEID=YES } 

[ ,.WRITEKY=YES] 

{ ,XTNTXIT=name ] 


1 
— 
Defines a 


Description i 
| console file. 
| 
| 


| 
| Defines a 

| direct access 
| file. | 


| | 
| 


| 
| 


| | 
| | 


| 
DTFDR 


DEVADDR=SYSxxx 
, LOAREA1=name 

, CISIZE=n] 

,» EOFADDR=name } 
, ERROPT={ IGNORE | SKIP|name} ] 
, LOAREA2=name ] 
» LOREG=(r)] 

, MODNAME=name ] 
[ ,RDONLY=YES ] 

{ ,RECSIZE=n J 

[, SEPASMB=YES } 
{ ,TRC=YES ] 

{ ,WLRERR=name } 


{ 
[ 
{ 
[ 
[ 
{ 


COREXIT=name 

» DEVADDR=SYSxxx 
, EOFADDR=name 

,» EXITIND=name 

» FRNAME=name 
»FRSIZE=n 

» HEADER=name 

,» LOAREA1=name 
{, BLKSIZE=n} 

[ ,DEVICE=3886} 
{ ,MODNAME=n ame ] 


IBM VSE/Advanced 


Functions Handbook 


| Defines a | 
| device-indepen— 
| dent file. | 


| Defines a 3886 
OCR file. 
| 
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ow’ Declarative Macros (cont...) 


Cc T TAL aD (i | 
Name |Operation| Operands | Description | 
> be a aes 4 
[name] | DTFDR [ , RDONLY=YES] | Defines a 3886 
(cont..)| [,SEPASMB=YES] | OCR file. 
| [ ,SETDEV=YES] | | 
{name] | DTFDU EOFADDR=name | Defines a 
wy | | | , IOAREA1=name | diskette file. | 
| | ,RECSIZE=n 
| [ ,CMDCHN=n ] | 


| | [,DEVADDR=SYSxxx ] 
{ ,DEVICE=3540] 

| | [,ERREXT=YES ] 

[ , ERROPT={ IGNORE | SKIP |name}] 
| [ ,FEED={ YES |NO} ] 

| [,FILESEC=YES] 

oN | | [ , IOAREA2=name ] 

[, IOREG=(r) } 

[ ,MODNAME=name ] 

[ , RDONLY=YES ] 

[, SEPASMB=YES ] 

[ , TYPEFLE={ INPUT | OUTPUT} ] | 
[ 

{ 

[ 

{ 


| 
| 
| | [,VERIFY=YES ] 
| | [,VOLSEQ=YES] | | 
| »WORKA=YES | 
| | {,WRTPROT=YES ] 
f se aaa 
| [mame] | DTFIS DSKXTNT=n Defines an 
| | , [OROUT=xxxxxx | indexed— 
| | , KEYLEN=n sequential 
| | ,NRECDS=n file. 
| » RECFORM={ F LXUNB | FIXBLK} | | 
| | ,RECSIZE=n 
| | [,CYLOFL=n ] | 


| 

[ ,DEVICE=nnnn] | 
| | [, ERREXT=YES ] | 

[ ,HINDEX=nnnn] 
| | [,HOLD=YES] 
| | | [, INDAREA=name } 
[ , INDSKIP=YES ] | 
| | {, INDSIZE=n] 
| | | [, IOAREAL=name ] 

[ , lOAREAR=name ] 
| { , IOAREAS=name ] 
Se [, IOAREA2=name } 
+ | [, IOREG=(r)] | 
a | {, 1OSIZE=n] 

| [,KEYARG=name] 

[ ,KEYLOC=n] 
[ ,MODNAME=name ] 
H | [,MSTIND=YES] 
| [,RDONLY=YES ]} 
{ ,SEPASMB=YES ] 
| [,TYPEFLE={RANDOM | SEQNTL 
pees | | RANSEQ} ] 


f : [ , VERIFY=YES ] 
ee [ ,WORKL=name ] 
| | [ ,WORKR=name ] 


[ ,WORKS=YES] 


f SS + --— 
| [name] j DTFMR DEVADDR=SYSxxx Defines a 
| , IOAREA1=name | MICR/OCR file. 


[ ,ADDAREA=n ] 

| | { ,ADDRESS=DUAL] 
: [ ,BUFFERS={25/n}] | 
aN | | | [ ,ERROPT=name} 


— | | [,EXTADDR=name ] 
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| Name {Operation| 
[name] DTFMR 
(cont. .) 


| | 
| | 
| | 
| | 
| | 
| | 


DTFPH 


Declarative Macros (cont...) 


Operands 


[, IOREG=(r) ] 

[ ,MODNAME=name ] 

{ ,RECSIZE={80|n}] 

[ ,SECADDR=SYSnnn ] 

[ ,SEPASMB=YES ] 

[ ,SORTMDE={ON| OFF} ] 


BLKSIZE=n 

, DEVADDR=SYSxxx 

, EOFADDR=name 
»FILABL={NO| STD |NSTD} 
, LOAREA1={name| (r)} 

[, ASCII=YES] 
[,BUFFOFF=n] 

[ ,CKPTREC=YES ] 

[ ,ERREXT=YES ] 

[ ,ERROPT={ IGNORE | SKIP| name} ] 
[ ,HDRINFO=YES ] 

[, IOAREA2={name| (r)}] 
[ , IOREG=(r) ] 

[ ,LABADDR=name ] 

[ , LENCHK=YES ] 

{ ,NOTEPT={ YES | POINTS }]} 
[ ,RDONLY=YES ] 

[ ,READ={ FORWARD | BACK}} 
[ ,RECFORM=xxxxxx ] 

[ ,RECSIZE={n| (r)}] 

{ , REWIND={ UNLOAD | NORWD} ] 
[ ,SEPASMB=YES ] 

[ , TPMARK={ YES | NO} ] 


[ , TYPEFLE={ INPUT | OUTPUT | WORK} ] 


[ ,VARBLD=(r) ] 
[, WLRERR=name] 
[ ,WORKA=YES ] 


COREXIT=name 

» DEVADDR=SYSxxx 
» EOFADDR=name 
,; LOAREA1=name 

[ ,BLKFAC=n ] 
[,BLKSIZE=n] 

[ ,CONTROL=YES } 
[ ,DEVICE=xxxxx] 
[ ,HEADER=YES ] 

[ ,HPRMTY=YES ] 

[ , IOAREA2=name ] 
[, IOREG=(r)] 

[ ,MODNAME=name } 


[ ,RECFORM={ F IXUNB | FIXBLK| UNDEF} } 


[ ,RECSIZE=(n) ] 
[ ,SEPASMB=YES ] 
[ ,WORKA=YES] 


TYPEFLE={ INPUT | OUTPUT} 
[,ASCII=YES] 

[, CISIZE=n] 

[ ,CCWADDR=name ] 

[ , DEVADDR=SYSxxx ] 

[ ,DEVICE=xxxx ] 

[ ,HDRINFO=YES] 

[ ,LABADDR=name ] 

{[ ,MOUNTED={ ALL | SINGLE} ] 
{ ,XTNTXIT=name ] 
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| Description | 


| Defines a 

| MICR/OCR file. 
[ 

| 

| 

| 


magnetic tape 
file. 


Defines a 1287 
or 1288 optical 
reader file. 


2 ee 


Defines a 
Physical 
Iocs file. 


oo 
; LO = 
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is , Declarative Macros (cont...) 


T_ T roan Fe 
| Name |Operation| Operands | Description | 


DTFPR | DEVADDR=SYSxxx | 
| ,IOAREA1=name | 
| [,ASOCFLE=filename] | 
| [,BLKSIZE=n] | 
| [,CONTROL=YES] | 
| [,CTLCHR={YES | ASA}] | 
| [,DEVICE=nnn] | 
| [,ERROPT={RETRY | IGNORE | name} ] | 
| [,FUNC=xxxx] | 
| [, IOAREA2=name] | 
| [,IOREG=(r)] | 
| | 
| | 
| | 
| | 
| | 
| 
| | 
| | 
| | 
| | 


[name] Defines a 


printer file. 


[ ,MODNAME=name } 

[ ,PRINTOV=YES ] 

[ ,RDONLY=YES] 

[ , RECFORM={ FIXUNB | VARUNB | UNDEF} ] 
[,RECSIZE=(r) ] 

[ ,SEPASMB=YES ] 

[, STLIST=YES] 

[ , TRC=YES ] 

[ ,UCS={ON| OFF} ] 

[ ,WORKA=YES ] 


| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 


| BLKSIZE={n|MAX}] | 
| ,EOFADDR=name | 
| [,CISIZE=n] | 
| [,DELETEFL=NO] | 
| [,DEVADDR=SYSxxx] 

| [,EOXPTR=name] | 
| [,ERROPT={ IGNORE |SKIP|name}] 

| [,FEOVD=YES] | 
| [,HOLD=YEs} | 
| [, IOAREA1=name] | 
| [,IOAREA2=name ] | 
| [, IOREG=(r)] | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 


Defines a 
sequential 
disk file. 


[ , LABADDR=name } 

[ , PWRITE=YES ] 

[ , RECFORM=xxxxxx ] 
[ ,RECSIZE={n| (r)}] 
[ ,SEPASMB=YES ] 

{ ,TRUNCS=YES ] 

[, TYPEFLE={ INPUT | OUTPUT | WORK} ] 
[ ,UPDATE=YES } 

[ , VARBLD=YES ] 

[ , VERIFY=YES ]} 

[ ,WLRERR=name ] 

[ ,WORKA=YES } 


DUMODFx x = I for Input | Defines a logic 
x = 0 for Output | module for a 
ERREXT=YES | diskette file. 
»ERROPT=YES 
[ ,RDONLY=YES] | 
| 


[ ,SEPASMB=YES] 


IOROUT={ LOAD | ADD | RETRVE | ADDRTR} 
[ ;CORDATA=YES] 

[ ,CORINDX=YES] 

[ ,ERREXT=YES } 

[ ,HOLD=YES]} 

{ , IOAREA2=YES] 


| | Defines a logic 
| | 
| | 
| | 
| | 
| 
| [ ,RDONLY=YES ] 

| | 
| | 
| | 
| | 
| | 


module for an 
indexed sequen— 
tial file. 


[ ,RECFORM={ FIXUNB | FIXBLK| BOTH} ] 
[,RPS=SVA] 
[ ,SEPASMB=YES ] 
[ TYPEFLE={ RANDOM | SEQNTL 
| RANSEQ} ] 
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Declarative Macros (cont...) 


[ ,SEPASMB=YES ] 


ce | ——— re ie 1 
| Name |Operation| Operands | Description | 
b+ — 1 
| [name] | MRMOD | [ADDRESS={SINGLE|DUAL}] Defines a logic} 
| | | [,BUFFERS=n] | module for a_ | 
| | | [,SEPASMB=YES] MICR / OCR file| 
| [name] | ORMOD [BLKFAC=YES ] ; Defines a logic 
| | {,CONTROL=YES ] | module for a 
| | , DEVICE={ 1287 | 1288} 1287 or 1288 
| | [ , IOAREA2=YES ] | optical reader 
| [ ,RECFORM={FIXUNB | FIXBLK|UNDEF}]| file. 

| 
| | 


| 
| 
| 
| 
| 
| [ ,WORKA=YES] 

a 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


{ 


PRMOD 


=) 
ro) 
3 
o 


| 

| 

| 

| 

| 

| 

| 

{ 

[CONTROL=YES } | Defines a logic| 
[ ,CTLCHR={ YES | ASA}] module for a | 
[ ,DEVICE=xxxxx ] | printer file. | 
[ ,ERROPT=YES ] | 
[ ,FUNC=xxx] | | 
[ , IOAREA2=YES ] | | 
{ ,PRINTOV=YES ] | 
[ ,RDONLY=YES } | 
{ , RECFORM={FIXUNB | FIXBLK| UNDEF} ] | 
[ ,SEPASMB=YES ] | 
{ ,STLIST=YES ] | 
[, TRC=YES ] | | 
| 


[ ,WORKA=YES] 
React bale ear eee | 


L 
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Imperative Macros 


i  - 


T — 7 
| Name |Operation| Operands | | 
ae — —— 
| [mame] | CCB | SYSnnn | Defines an IOCS | 
| | ,command—list—name | command control 
| | | [,X'nnnn'] | block. 

: | | | [,senseaddress] | 
\ ee ee 
é. | [mame] | CHECK | {filename|(1)} | Prevents processing | 
od | | {,control-address| ,(0)] until I/O data | 
| | | transfer is complete| 
[name] | CLOSE| | {filename1|(r1)} Deactivates a file. 
| | CLOSER | [,filename2|,(r2)]. | 
——o L 7 —— 
| [name] | CNTRL | {filename|(1)} Provides non-data_ | 
| | ,code[,n1l]}][,n2] device commands. | 
pox |} + +. ! — 
: [name] | DISEN | {filename|(1)} Stops feeding docu- | 
— | | ments thrugh MICR | 
| | | or OCR devices. | 
| oe =| 
| [name] | DSPLY | {filename](1)} | Displays document | 
| | ,€r2), (13) field on 1287 
| | | | display scope. | 
| 1 +~ = — 
| [mame] | ENDFL | {filename| (0)} Ends the mode initi-] 
| | ated by SETFL. 
+ : 
| [name] | ERET | {SKIP| IGNORE|RETRY} | Returns control from| 
| | your error—process— 
| ing routine to IOCS. 
I I 
| [name] | ESETL | {filename] (1)} Ends sequential mode| 
| initiated by SETL. | 
|—_+_— - 
| [name] | EXCP {blockname | (1)} | Request PIOCS to 
| | [,REAL] start an 1/0 | 
| operation. | 
+ 1 — 
| [name] | FEOV {filename|(1)} Forces end of volume] 
| | for magn. tape file. | 
4 . 4 
{name] | FEOVD {filename|(1)} | Forces end of volume 
| | | for disk file. | 
“s + i { | 
Es | [name] | GENIORB | CCW={namel|(S,namel)|(r1)} | Generates an I/0 
i eal | | {,DEVICE=SYSxxx | | Request Block at 
Cd | | LOGUNIT={name2 execution time. | 
| (S,name2) | (x2) }} 
| {[ ADDRESS={name3 
| (S,name3) | (r3)}} 
[ , LENGTH=fieldlength] | 
[ ,ECB={name4 
| (S,name4) | (r4)}] 
[ ,ERREXIT={name5 | 
es | (S,name5) | (r5)}] 
\ | [ ,FIXLIST={name6 
a (S,name6) | (r6)}] 
| [,FIXFLAG=(option,...)] 
| [ ,IOFLAG=(option,...)] 
: ~ + — 
{name] | GET {filename|(1)} | Obtains th next seq— 
| { ,workname| ,(0)] uential logical re~ 
cord from input file 
Ie: ! a7) 
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Imperative Macros (cont...) 


| Name |Operation| Operands | 


{filename|(1)} 
[,{worknamel|(0)}, 
{workname2| (2)}] 


Sends message to | 
operator's console, | 
requiring a reply. | 


| [mame] | IORB | DSECT=YES | Displays the 1/0 | 
| | or | Request Block or | 
| | | CCW=namel , DEVICE=SYSxxx | Generates an 1/0 | 
| | | [,ECB=name2] | Request Block at | 
| | | [,FIXLIST=name3 ] | assembly time. | 
| | | [,FIXFLAG=(option,...)] | | 
| | | [,IOFLAG=(option,...)] | 
| [name] | LBRET | {1|2]|3} | Returns control to | 
{ | | | IOCS after label- | 
| | | | processing. 
| [mame] | LITE | {filename|(1)} | Lights pocket lamps | 

| [,light-switches], (0)] | on 1419 or 1275. | 
| [mame] | NOTE | {filename|(1)} | Obtains identifica— | 
| | | | tion for a physical | 
| | | | record or logical | 
| | | | block. | 
| [name] | OPEN| | {filename|(1)} | Activates a file. 
| | OPENR | [,filename2],(r2)],... | 
| [mame] | POINTR | {filename|(1)} | Repositions a file | 

| , {address | (0)] | to a specified 

| | | | record. | 
| [mame] | POINTS | {filename|(1)} | Repositions a file | 
| | | | to its beginning. | 
| [name] | POINTW | {filename|(1)} | Repositions a file | 
| | | ,{address|(0)] | to a specified | 
| | | | record. 
| [mame] | PRTOV | {filename|(1)},{9]|12} | Specifies printer | 
| | | [,routine—name] , (0)] | action when carriage| 
| | | ; | overflow occurs. | 
| [mame] | PUT | {filename| (1)} | Moves (outputs) a | 
| | [,workname|, (0)] | logical record to | 
| | | [, STLSP={controlfield| | I/O device. | 
| | | (r1)}] | | 
| | | [,STLSK={controlfield| | | 
| | | (r2)}] | | 
| | | 

| | 

| | 


aa er 
| [name] | RDLNE | {filename|(1)} | Reads a 1287 journal| 
| | | | tape line in correc—| 
| | | | tion mode. | 


| [name] | READ | {filename| (1)} | Transfers data from | 
| | | {,SQ,{area| (0)} | an input file to an | 
| | | [,legth],(r1)|,S$] | area in virtual 

| | | |,ID | storage. | 
| | | | ,KEY | | 
| | | |,OR,{name| (r2)} | | 
| | | |,DR,{mame| (r3)|number, | | 
| | number} | | 
| | | {MR | | 


| [name] | RELSE | {filename| (1)} | Skip the remaining | 
| | | 


| records in a block. | 
a el 


’ 
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Imperative Macros (cont...) 


| Name |Operation| Operands 


| [name] | RESCN | {filename] (1)} 
| | | (1), (22)[,n1][,n2] 


| [name] | SECTVAL | [DDKR={name1] (0)}] 
| | ,DVCTYP=name2 
| 


| | 


| Rescans a field on | 
| an OCR document. | 


| Calculates the sec— | 
| tor value for a CKD | 
| disk file record. | 


| 
a 


| [name] | SEOV | filename 
| 


| [name] | SETDEV | {filename| (1)} 
| | ;{phasename| (r)} 


| [mame] | SETFL | {filename|(0)} 
| | 
| [name] | SETL | {filename| (r1)} 


»{id—name| (r2) 
| | |KEY|BOF|GKEY} 


| Forces end—of—volume| 
[| for a system file | 
| on tape. | 


| Changes 3886 format | 
| records. 


| Sets file-load mode | 
| in ISAM. 


| Sets sequential | 
| retrieval mode in | 
| ISAM. 


| [mame] | TRUNC | {filename|(1)} | Writes a short block] 
| | | | of records. | 
a | 
[name] | WAIT {blockname| (1)} PIOCS waits for an | 

| 


| 
| 
| 
| 


I/O operation to be 
completed before 
continuing. 


| 
| 
— 


WAITF {filenamel|(r1)} 


[name] } 
| [,filename2|(r2)],... 
| 
| 


| | 
| | 
| | 
| | 


LIOCS waits for an | 
I/O operation to be | 
completed before | 
continuing. i 


[name] | WRITE | {£filename| (r1)} 
| {,{SQ| IPDATE} ,{area| (0)} 
| [,length| (r)] 
| |,AFTER[ ,EOF] 
| fy ED 

| |,KEY 

| ;NEWKEY 

| 


| 
| ,RZERO 
Ma 


| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 


| 
| 
| 
| 
| 
| 
| 
| 
if 


Transfers a record 
from virtual storage 
to an output file. 


fe aes foto 
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System Control Macros 


| Name |Operation| Operands 


[name] | ASPL | [DSECT={NO|YES}] 
| | 


| ASPL={name1| (r1)} 


| [name] | ASSIGN 
| | ,SAVE={name2| (r2)} 


© Copyright IBM Corp. 1985 


| Description | 


| Generates a mapping DSECT| 
| for the ASSIGN macro. 


| Assigns or releases tape | 
| drives dynamically. | 


| [mame] | ATTACH | {entrypoint|(S, | Initiates a subtask. | 
| | | entrypoint) | (r1)} | | 
| | | [,SAVE={savearea | | 
| | | |(S,savearea)|(r2)}] | | 
| | | [,ABSAVE={absavearea | | 
| | | | (S,absavearea) | (r3)}]| | 
| | | [,ECB={ecbname | | 
| | | |S,ecbname)|(r4)}] | | 
| | | {,NAME={name| (S,name) | 
| | | | (e5)}] | | 
| | | [,MFG={area|(S,area) | | 
| | | | (r6)}] | 
eee neem — 4 
| [mame] | CALL | {entrypoint | (15)} | Passes control to a spe- | 
| | | [, @parameterlist)] cified entry point in | 
| | | another program. | 
|} ——— — 
| [name] | CANCEL [ALL] Terminates a task or | 
| | | subtask. | 
| [mame] | CDLOAD {phasename| (1)} | Loads a specified phase | 
| | [ ,PAGE={NO| YES}] | into the partition | 
| | | [,RETPNF={NO| YES} } | GETVIS area. | 
te - a 
| [mame] | CHAP | Lowers the priority of | 
| | | | the issuing subtask. | 
i= ae { 

| [mame] | CHKPT SYSnnn, | Records the status of 
| | {restart—address|(r1)}| your program for later | 
| | | [,end-address|,(r2)] | restarting. | 
| | [.tpointer], (r3)] | | 
| | | [-dpointer|,(r4)] | | 
| | [. filename] ,(r5)] | | 
|} = 4 4 

| [name] | COMREG | [REG=(rl)] | Places the partition's 
| | | | communication region | 
| | | | address into the speci- | 
| | fied register. | 
| aa a) 
| [name] | CPCLOSE | [arglist|(1r1)] | Issues a CPCLOSE command | 
| to VM/SP to release a | 
| | | print or punch file for | 
| | output. | 
—— 4 
{name] | CPCOM | ACMD={addr|(1)}, | Allows authorized sub- | 
LCMD={ length| (0)} systems to submit a CP | 
| | command to VM/SP. | 
{name] | DEQ {xrcbname]| (0)} | Releases an ENQed | 
| resource. | 
{name] | DETACH | [SAVE={savearea|(1)}] | Terminates (normally) a | 

| | subtask. 
_ at eee eee i =} 
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System Control Macros (cont...) 


> ca i i 
| Name |Operation| Operands Description 
—- ! | 4 
| [name] | DTL NAME=resourcename | Generates a DTL (Define | 
| | | [,CONTROL={E|S}] The Lock) control block 
| | { ,LOCKOPT={1/2[4}] at assembiy time. 

' | | [ .KEEP={NO| YES}] 

, \ | | | [.OWNER={TASK | | 

— | | | PARTITION} ] | 
| | [ ,SCOPE={INT|EXT} ] 

| [ ,VOLID=volume-ID] | 
[name] | DUMP [RC={n| (115) }] Produces a hexadecimal 
| | dump. 
oo 4 4 
[name] | ENQ | {xcbname| (0)} Protects a resource. 
{ ! 4 

“ \ | [name] | EOJ [RC={n| (r15)}] Ends a job step or sub-— 

1 ~ | task. 

‘oy b t | 
| [name] | EXIT | {AB[IT|MR|OC|PC| TT} Returns control from your| 
| | interrupt—checking 

| | routine. 
f a t + 
| [name] | EXTRACT | ID=BDY Displays partition 
| | ,AREA={namel|(S,namel)| boundaries. 
| Reso, 
| , LEN={ length] (r2)} | 
| | | [,MFG={name3|(xr3)}}] 
| [ MODE=(T|P}] 
{ { 
{name] | EXTRACT | ID=PUB Displays unit information 
| ,AREA={namel1|(S,namel)| from the PUB table. 
| | |(r1)} 
| , LEN={ length] (r2)} 
| { ,MFG={name3|(r3)}] 
| [,PID={name4/ (S,name4) 
{ | (r4)}] 
| [,SEL={name5|(S,name5) | | 
| | (r5)}] | 
| | [,DISP={name6 
| | |(S,name6) | (r6)}] 
— | { 
{name] | FCEPGOUT| {listname] (1)| } Forces an area to be | 
| {beginaddr, endaddr paged-out. 
. | [,beginaddr,endaddr]} | 
} | + 7 
dl | [name] | FETCH | {phasename; (S,address)| Loads a phase; transfers | 
| 1(1)} control to it. | 
| {,entrypoint 
| | |(S,entrypoint){|(0)] | 
| [, LIST={listname 
| | | |(S,listname)| (r1)}] 
| | [,SYS=YES] 
| { ,DE={NO| YES|VSE 
He | | [FORM] }] | 

“™* | [.MFG={area|(S,area) | 

a | | (r2)}] 
| | | [,RET={NOj YES}] | 

[name] | FREE | {filename} (1)} Make a previously held 
| | | track or CI available to 
| | | | other tasks. 
| = 
[name] | FREEVIS | [ADDRESS={name1|(1)}] {| Releases blocks of | 
2s | | [, LENGTH={name2] (0)}] virtual storage previous— 
\ | | [,SPID={name3|(1)}] | ly obtained by a GETVIS. 
a ¥ | | [,SVA={YES|NO}] 
er ba == i —) 
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System Control Macros (cont...) 


zs 
Name |Operation| Operands 


Pl 
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Description 


[mame] | GENDTL | 
| | (x1)}] 
| [,CONTROL={E|S}] 
| [,KEEP={NO| YES} ] 
| [,LENGTH={NO|YES}] 
| [,LOCKOPT={1|2|4}] 
| [,NAME={name2 
| |(S,name2)|(r2)}] 
| [,OWNER={TASK| PART. }] 
| [,SCOPE={ INT|EXT}] 
| [{, VOLID={name2 | 
| (S,name3) | (R3)} 


[ADDR={namel|(S,namel)| Generates a DTL (Define 


| The Lock) control block 


at execution time. 


+—_ 


[name] ‘GENL phasenamel,phasen.2,.. 
[ ,ADDRESS={ area 
| (S,area) | (r1)} 

» LENGTH=number | 
[ ,ADDRESS={ DYNAMIC 
| DYN} [,ERREXIT={ addr 
|(S,addr) | (r2)}]}] 


{ ,DE={OLD | VSE [FORM] } ] 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
! 
| 
| 
| 
| 
| 
| 
| 


Generates a local 
directory list in the 
partition. 


[name] | GETIME | [STANDARD|BINARY 
| TU|MIC} 
[ , LOCAL] GMT] 
[ ,CLOCK=YES ] 
[ ,MFG={area| (S, area) 


|. dey) 
areas) Neer 


| 
| 
| 
| 
| 
| 
| 
| 
7 
| 
| 
| 
| 


}—— 


Q 
i 
cer 
<a 
HI 
” 


[ ADDRESS={name1] (1)}] 
| [, LENGTH={name2]| (0)}] 
| [,PAGE={NO|YES}] 

| [ ,PFIX={NO| YES} ] 

| [ ,POOL={NO| YES} ] 

| {,SPID={name3|(1)}} 

| [,SVA={NO| YES}] 

[ , TSKSUBP={NO| YES} ] 


{name ] 


ma 


Obtains the time of day. 


a en a pe ae ee me ol pa a ee ee ee A er ce cerca seme ees mlb aneees 


Obtains a block of 
virtual storage from a 
GETVIS area. 


7 


| 
| 
——}— 


for EXTRACT ID=PUB macro. 


—— 


Generates a mapping DSECT| 


Produces a hexadecimal 
dump; terminates the 
main or subtask. 


| 
| 
[. 
| 


| 
| 
| 
| 
| 


t 
[name] | JOBCOM | FUNCT={PUTCOM|GETCOM} | Permits communication 
| ,AREA={ address | (r1)} between jobs or job steps 
| | , LENGTH={length|(r2)} | in a partition. 
coasted 


[name] | LFCB SYSxxx, phasename 

| [ ,FORMS=xxxx ] 

| | [,LPI=n] [,NULMSG] 

{name ] 

| (1)} 

[, loadpoint 

(S, loadpoint) | (0)] 

, LIST={listname 

(S, listname) | (r1)}] 

, SYS=YES ] 

,DE={NO| YES 

VSE [FORM] } ] 

| {,TXT=NO] 
,MFG={ area| (S,area) 

b @2y}] 

| [,RET={NO| YES}] 


Comal 


an ee 


sae 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
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| 
ae es 
| 
| 
| 
| 
| 
| 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


Loads the forms-control 
buffer. 


{phasename|(S,address)| Loads specified phase; 


returns control to 
calling phase. 


5 
| 


rR 


oan ar 
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| i iis Tes Te ig ©. a ane) 
| Name |Operation| Operands | Description | 
I { 
| [mame] | LOCK | {name| (S,name)| (r)} | Enqueues a resource | 
| | | [.FAIL={RETURN|WAITC | access request with pro- | 
| | | |WAIT}] | tection against disallo-~ | 
| | | | wed usage. | 
|__|} — 4 
| [name] | MAPBDY | [DSECT={NO|YES}] | Generates a mapping | 
| | | | DSECT for the EXTRACT | 
| | | | ID=BDY macro. 
Pp 7 4 
| [name] | MAPPSID | | Generates a mapping | 
| | | | DSECT for the SUBSID | 
| | | macro. 
— + + — 
| [mame] | MODDTL | ADDR={namel|(S,namel) | Modifies a DTL (Define 
| | |(r1)} | The Lock) control block. | 
| | | [,NAME={name2 
| | |(S,name2)|(r2)}] | | 
| | | [,CHANGE={ON| OFF} ] | | 
| | {,CONTROL={E|S}] | | 
| | | [,LOCKOPT={(1|2|4}] | | 
| [ ,KEEP={NO| YES} ] | | 
| | | [, OWNER=({ TASK | 
| | PARTITION} ] | 
| | | [,SCOPE={ INT|EXT}] | | 
| | [ , VOLID={name3 | | 
| | | (S,name3) | (R3)}] | | 
| [mame] | MVCOM | to,length,{from|(0)} | Modifies communication | 
| region. | 
| [name] | PAGEIN beginaddr, endaddr | Brings specified areas | 
| [,beginaddr,endaddr]..| into real storage. 
| | [,ECB={ecbname|(0)}] | 
| [name] | PAGEIN {listname|(1)} | Brings specified areas 
| [,ECB={ecbname|(0)}] | into real storage. | 
| [name] | PDUMP | {address1|(ri)} | Produces a snapshot | 
| | | ,{address2] (r2)} | hexadecimal dump; pro- | 
| | | [,MFG={area|(S,area) | cessing continues next | 
| | | | €r3)¥] | instruction. | 
L- oe 
| {mame] | PFIX | beginaddr,endaddr | Brings pages into real | 
| | [,beginaddr,endaddr]..| storage; fixes them | 
| ' + 1 4 
| [mame] | PFIX | {listname| (1)} | Brings pages into real 
| | | | storage; fixes them | 
L | t + 4 
| [name] | PFREE | beginaddr, endaddr | Decrements a page's | 
| | {,beginaddr,endaddr]..| PFIX counter by 1. | 
—— - 7 4 
| [name] | PFREE | {listname|(1)} | Decrements a page's | 
| | | | PFIX counter by 1. | 
on + 4 = 
| [name] | POST | [ecbname| (1)] | Posts an ECB and removes | 
| | [ SAVE={savearea|(0)}]| a waiting task from the | 
| | | | wait state. | 
Lb fe + ! 
| [mame] | RCB | Generates a Resource | 
| | | Control Block. | 
— ! = 
| [name] | REALAD {address | (1)} | Returns a real storage 
| | | | address corresponding to | 
| | | | a virtual address. | 
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T TT 4 

| Name |Operation| Operands | Description 
—— aa ae — 
| [name] | RELEASE | (SYSnnn[,SYSnnn]...}) | Releases programmer | 
| | | [,savearea] | logical units | 
| tr = “— or 
| [name] | RELPAG | beginaddr,endaddr Releases specified | 
| | | [,beginaddr,endaddr]..| storage areas | 
| a | 
| [mame] | RELPAG | {listname|(1)} Releases specified | 
| | | storage areas | 
|—__+—__ 4 
| {mame] | RETURN | (ri[,r2]}) | Restores registers, | 
| | | returns control to | 
| | | | calling program | 
+} ! ! 
| [mame] | RUNMODE | Returns mode information | 
' . 4 i — 
| [name] | SAVE | Cri[,xr2]) Saves regs in savearea_ | 
f 7 = 
| [name] | SETIME | {timervalue|(1)} Sets interval to | 
| | [,tecbname] , (r)] specified value | 
| | | [PREC] | 
= : 
| [mame] | SETPFA | {entryaddress|(0)} Makes or breaks a linkage| 
| | | to page fault appendage | 
| | | routine | 
[name] | SETT | {timervalue|(1)} | Secs the task timer to | 
| | | the specified value | 
— 
[name] | STXIT | {AB|IT|OC|PC|TT} | Establishes linkage from | 
| | ,{xrtnaddr| (0)} | supervisor to your inter—| 
| ,{savearea| (1)} | rupt processing routine | 
| | [,OPTION={DUMP|NODUMP | | 
| | |EARLY}] | | 
| | | {,MFG={area|(S,area) | | 
| 'bGe)33 | | 
[mame] | STXIT | {AB|IT|OC|PC|TT} | Terminates linkage from | 
| | supervisor to your inter—| 
| | | rupt processing routine | 
[- t= te 
{name] | SUBSID | INQUIRY Retrieves information | 
| ,NAME={namel|(S,namel)| about the supervisor | 
| | | |(r1)} | 
| | , AREA={name2| (S,name2) | 
| | | | (r2)} | 
| | | ,LEN={length| (r3)} | 
| | [,LVLTEST={NO]| YES}] | | 
| | {,MFG={name4| (r4)}] | 
= ! - 
{name] | TECB | Generates a timer event | 
| | control block | 
+ “+ = es: { 
[name] | TESTT | [CANCEL] Tests time elapsed from | 
| | task timer set by SETT | 
b + - —| 
| [name] | TPIN | Deactivates partition | 
4 4 = 
[name] | TPOUT | Reactivates partition | 
an ns ! a 
[name] | TTIMER | [CANCEL] Tests time elapsed from | 
| interval timer set by | 
| | SETIME | 
\ | eee 
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i So al — 
| Name |Operation| Operands Description | 
' ~ ! 
| [mame] | UNLOCK | [{name| (S,name) | Releases a resource that 
| | | (x) } | ALL] | was enqueued by the LOCK | 
| | macro 
[name] | VIRTAD {address |(1)] Returns virtual address 
| | | corresponding to real 
| | | address | 
[name] | WAIT {blockname | (1)} Sets a task into wait | 
| state until an ECB is 
| | | posted 
f t to 
[name] | WAIT | {ecbname] (1)} | Sets a task into wait 
| | | state until an ECB is 
| | posted 
t 4 
[name] | WAITM {ecbl,ecb2,.... Sets programs or tasks 
| | | |listname|(1)} into wait state until | 
| | | | ECB's are posted | 
i re 4 
[name] | XECBTAB | TYPE={DEFINE|DELETE| | Defines or changes a | 
| | CHECK|RESET|DELETALL}| cross—partition event | 
| | | ,XECB=xecbname control block | 
| | | { ,XECBADR={xecbfield| ) 
| | (S,xecbfield)|(r1)}] | 
| | [ ,ACCESS={ XPOST | | 
| | XWAIT}] | | 
| | [,MFG={area| (S,area) | 
| | | (r2)}] | 
te + — 
{name] | XPOST | XECB={xecbname| (1)} Posts a specified XECB | 
| | POINTRG=(14) | 
a t | 
[name] | XWAIT | XECB={xecbname|(1)} | Waits for a specified | 
| | POINTRG=(14) | XECB to be posted 
! Le L J 
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LIOCS Module Name Versus Options 


ova A Soe eS ee Se et QRS a 
| CDMOD name = IJCabcde | 


 Sepeaen Ses8- a UR © OIG ONSET OAC RRR TER CEITERS ATASGE SS NL PR 
| a | F RECFORM=FIXUNB (always for INPUT, CMBND, or FUNC=I files) | 
| | V. RECFORM=VARUNB 

| | U  RECFORM=UNDEF- | 


| b | A CTLCHR=ASA (not specified if CMBND) 
| | Y CTLCHR=YES 
| { © CONTROL=YES 
| | Z CTLCHR or CONTROL not specified 
{| ¢ | B RDONLY=YES and TYPEFLE=CMBND 
| {| © TYPEFLE=CMBND 
{ | H RDONLY=YES and TYPEFLE=INPUT 
| | I TYPEFLE=INPUT 
| | N RDONLY=YES and TYPEFLE=OUTPUT 
| | O TYPEFLE=OUTPUT 
-— 
| d | Z WORKA and IOAREA2 not specified 
| | W WORKA=YES 
| I 
| | B WORKA and IOAREA2 
| | Z WORKA=YES not specified (CMBND file only) 


DEVICE=2540 

DEVICE=1442, 2596 

DEVICE=2520 

DEVICE=2501 

DEVICE=2540 and CRDERR 

DEVICE=2520 and CRDERR 

DEVICE=3505 

DEVICE=3525 and FUNC=R/P or omitted 
DEVICE=2560 and FUNC=R/P or omitted 
DEVICE=5425 and FUNC=R/P or omitted 
DEVICE=3525 and FUNC=RP 

DEVICE=3525 and FUNC=RW 

DEVICE=3525 and FUNC=PW 

DEVICE=3525 and FUNC=I 

DEVICE=3525 and FUNC=RPW 
DEVICE=2560 and FUNC=RP 

DEVICE=2560 and FUNC=RW 

DEVICE=2560 and FUNC=PW 

DEVICE=2560 and FUNC=I 

DEVICE=2560 and FUNC=RPW 
DEVICE=5425 and FUNC=RP 

DEVICE=5425 and FUNC=RW 

DEVICE=5425 and FUNC=PW 

DEVICE=5425 and FUNC=I 

DEVICE=5425 and FUNC=RPW 
DEVICE=3881 


o 


WORM RM AHH M QAO OMNWPHOANAUEFWNHEO 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
IOAREA2=YES | 
| 
| 
— 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


| DIMOD name = IJJabcde 


| a | F always | 
J 
| b | C RPS=SVA is not specified | 
| | V  RPS=SVA | 


SS SS SS SSS SS SS 
| c | B TYPEFLE=OUTPUT (both input and output | 
| | I TYPEFLE=INPUT | 


| d | I IOAREA2=YES | 
| | Z IOAREA2=YES is not specified | 


| e | © RDONLY=YES | 


| | D RDONLY=YES is not specified | 
Oi a 
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LIOCS Module Name Versus Options (cont...) 


[ent pe a aoa NY gO gere. en ew et a See ee A SS Sl 
| DRMOD name = IJMZabDO 


| a | S SETDEV=YES 
| | Z SETDEV=YES not specified 


ss | b | R  RDONLY=YES 


| | | Z RDONLY=YES not specified 


| e | Y RDONLY=YES 
| | Z RDONLY not specified 


| 

l = = | 

| DUMODFx name = IJNabcde | 

oe | 

| a | D always | 

_ 

| b | I DUMODFI (Input) | 

ind | | 0 DUMODFO (Output) | 

“ aN 4 

Keca, a3 | c | © ERROPT=YES and ERREXT=YES | 

| | E  ERROPT=YES | 
| | Z neither is specified 

ft | 

| d | Z always | 

eee eee 

| 

| 


Wong tg oh pete es SS ee ae ed 
| ISMOD name = IJHabcde | 


a | A  RECFORM=BOTH, IOROUT=ADD or ADDRTR 

| B RECFORM=FIXBLK, IOROUT=ADD or ADDRTR | 
| U RECFORM=FIXUNB, IOROUT=ADD or ADDRTR | 
| Z RECFORM is not specified. (IOROUT=LOAD or RETRVE) | 


IOROUT=ADDRTR | 
IOROUT=ADD | 
IOROUT=LOAD | 
IOROUT=RETRVE | 
IOROUT=ADDRTR, RPS=SVA | 
IOROUT=LOAD, RPS=SVA | 


KS DMH Db 


| B TYPEFLE=RANSEQ | 
| G IOAREA2=YES, TYPEFLE=SEQNTL or IOROUT=LOAD | 
| R  TYPEFLE=RANDOM | 
| S TYPEFLE=SEQNTL | 
| Z neither is specified (IOROUT=LOAD or ADD) | 


| B CORINDX=YES and HOLD=YES | 
| © CORINDX=YES | 
| O HOLD=YES | 
| Z neither is specified | 


CORDATA=YES, ERREXT=YES, RDONLY=YES | 
CORDATA=YES and ERREXT=YES | 
CORDATA=YES and RDONLY=YES | 
CORDATA=YES | 
| 
| 
| 
| 


ERREXT=YES and RDONLY=YES 
ERREXT=YES 

RDONLY=YES 

neither is specified 


NKHNWOD 


SS SSS SS 
; | MRMOD name = IJUaZZZZ | 
: {J 
ve » | a | S_ single address adapter | 


| | D dual address adapter | 
5 ee i] 
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anes 
| ORMOD name = IJMabede 


© Copyright IBM Corp. 1985 


RECFORM=F IXUNB 
RECFORM=FIXBLK 
RECFORM=UNDEF 

RECFORM=UNDEF and BLKFAC=YES 


CONTROL=YES 
CONTROL=YES is not specified 


IOAREA=YES 

WORKA=YES 

both are specified 
neither is specified 


Jal F 
| | x 
} ju 
| |p 
|b jc 
ae 
le | t 
| |W 
| |B 
lee 
be 
Jat 
| [D 
| 
le] z 


device is in tape mode 
device is in document mode 


always 


Ss 
| PRMOD name = IJDabcde 


| F 
| Vv 
| u 


RECFORM=F IXUNB 
RECFORM=VARUNB 
RECFORM=UNDEF 


SA CHNMNOAK PD 


| 


QO 


oO 


MESCmMHANA 


NOOO How 


CTLCHR=ASA 

CTLCHR=YES 

CONTROL=YES 

STLIST=YES 

none of these is specified 
DEVICE=3525 with 2-line printer 
DEVICE=2560 

DEVICE=5425 


ERROPT=YES and PRINTOV=YES 


PRINTOV=YES, DEVICE is not 3525, and ERROPT is not specified 
PRINTOV=YES, DEVICE=3525, and FUNC=W[T] or omitted 


PRINTOV=YES, DEVICE=3525, and FUNC=RW[T] 
PRINTOV=YES, DEVICE=3525, and FUNC=PW[T] 
PRINTOV=YES, DEVICE=3525, and FUNC=RPW[T] 


neither PRINTOV nor ERROPT is specified, and DEVICE is not a 


3525 


omitted 


PRINTOV=YES not specified, DEVICE=3525, and FUNC=RW[T] 
PRINTOV=YES not specified, DEVICE=3525, and FUNC=PW[T] 
PRINTOV=YES not specified, DEVICE=3525, and FUNC=RPW[T] 
ERROPT=YES and PRINTOV=YES is not specified 


FUNC=W or omitted and DEVICE=2560 or 5425 


FUNC=RW and DEVICE=2560 or 5425 
FUNC=PW and DEVICE=2560 or 5425 
FUNC=RPW and DEVICE=2560 or 5425 


| 
| 
| 
| 
| 
| 
| 
PRINTOV=YES not specified, DEVICE=3525, and FUNC=W[T] or | 
| 
| 
| 
| 
| 
| 
| 
| 
| 


jafz 
fi. hc 


IOAREA2=YES 
IOAREA2=YES is not specified 


RDONLY=YES and WORKA=YES 
WORKA=YES 

RDONLY=YES 

neither is specified 
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| Bytes* | Bits | Contents | Function | 
io (ee ao eee | 
{ 0-15) | | | CCB. | 
| (00-OF) | | | | 
| | | | | 
|8csy> | o | | 1 = 2501 double-CCW support. | 
| | | | | 
| 16 | o | | 1 = OMR, O = omitted. (Note 1) | 
| (10) | 1 | | 1 = ERROPT, O = omitted. (Note 2) | 
| | 2 | | COBOL open; ignore option. 
| | 3 | | 1 = GET issued, (Note 3) | 
| | | | 0 = GET not issued. (Note 7) | 
| | 4 | | DTF table address constants 
| | | | relocated by OPENR. | 
| | | | File Association: 
| | 5-7 | | 000 = READ only 
| | | | 010 = READ/PRINT (Note 4) 
| | | | 101 = READ/PUNCH/PRINT (Note 5) 
| | | | 001 = READ/PUNCH. (Note 5) 
| | | | 
| 17-19 | | | Address of logic module. | 
|. (l=13))| | | | 
| | | | | 
| 20 | |x'02"' | DTF type. | 
| (14) | |x'o5' | DTF type for 2560 or 5424/5425. 
| | | | | 
| 21 | | | 1 = open; 0 = closed. | 
| (15) | 1) | | First time switch. 
| 2 | 1 = 1442 or 2596; O = other 
| 3 | 1 = 2560, 3525, or 5424/5425; 
| | 0 = other. 
| 4 | 1 = 3505; O = other. 
| 5 | 1 = 2 I/O areas; 0 = 1 1/0 area. | 
| | 6 | 1 = 2520; O = other. | 
| | 7 | | 1 = 2540; 0 = other. 
| | 
22 B'SSFOX010' | Normal command code i 
(16) | (not for 2560 or 5424/5425). | 
| | SS: 00 = pocketi, 01 = pocket2, | 
| | 10 = pocket3. (Note 6) | 
| | F : 1 = column binary, (Note 3) | 
| | O = EBCDIC. 
| | X : 1 = OMR or RCE, (Note 3) | 
| | | 0 = neither. 
|B'HOBOOO10' | Read command code (2560). | 
| | H : 0 = hopperl, 1 = hopper2. | 
| | B.: 0 = EBCDIC, 1 = column binary. 
B'HMMMOO11' | SS command code (5424/5425). 
| H : 0 = hopperl, 1=hopper2. 
| MMM: 001 = stackerl, 
| 010 = stacker2. 
| | 011 = stacker3, 
| | 100 = stacker4. 
| | 
23 | Control command code 
(17) | (not for 2560 or 5425). 
| B'HOBOOO10' | Read command code (2560). 
| 1B'HMMMOO11' i SS command code (5424/5425). i 
| | H : 0 = hopperl, 1=hopper2. 
| MMM: 001 = stackerl. 
| 010 = stacker2. 
| | | 011 = stacker3. 
i | 100 = stacker4. 
1 1 
24-27 | | Address of IOAREA2. 
(18-1B) \ (If IOAREA2 is not specified, 
| | address of IOAREA1.) | 
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DTFCD (Input - Reader) (cont...) 


| Bytes* | Bits | Contents | Function 
28 i} o | | 1 = 2560; O = other. 
(ic) | 1 | | 1 = 5424/5425, 0 = other 
| 2-7 | | Not used. 
| | | 
29-31 | | | Address of EOF routine. 
ais | | 
32-39 | | | Read CCW (2560). 
(20-27) | | | Stacker select CCW (5424/5425). 


| Bytes 40-49 as used for all files except 2560 and 5424/5425 files. 


| 
| 
| 
44-49 | 
| 
| 
| 


reo 


|LA &IOREG,0(14)| Load user pointer register. 
|NOP 0 | 

| | 
IMVC 0(&BLKSIZE,| Move IOAREA to WORKA. 
| 13),0(14) | 

| | 

| NOP 0 | 

| DG x'oooo' | 


| The following bytes (50-105) are used for 2501 double-CCW support. 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


50-55 | 
(32-37)| 


56-71 
(38-47) 


72 
(48) 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


WNrR Oo 


WNHre OO 


Unused CCB. 


1 
1 


OMR, 0 = omitted. (Note 
ERROPT, 0 = omitted. (Note 
COBOL open; ignore option. 

1 = GET issued, (Note 
0 = GET not issued. (Note 
DTF table address constants 
relocated by OPENR. 


000 = READ only 

010 = READ/PRINT (Note 
101 = READ/PUNCH/PRINT (Note 
001 = READ/PUNCH. (Note 


Address of logic module. 
DIF type. 
DTF type for 2560 or 5424/5425. 


1 = open; O = closed. 


| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| File Association: 
| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| First time switch. 
| 
| 
| 


other. 
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— DTFCD (Input - Reader) (cont...) 


| Bytes* | Bits | Contents | Function | 
| 77 | 4 | | 1 = 3505; 0 = other. | 
| (4D) kao 1 } 1 = 2 1/0 areas; 0 = 1 I/O area. | 
| | 6 | | 1 = 2520; 0 = other. | 
be. | { 7 | | 1 = 2540; 0 = other. | 
% | | | | | 

ey | 78 | {B'SSFOX010' | Normal command code (not for 2560 
a | (4E) | | | or 5424/5425). | 
| | | | SS: 00 = pocketl, | 
| | | | 01 = pocket2, | 
| | | | 10 = pocket3. (Note 6) | 
| | | | F : 1 = column binary, (Note 3) | 
| | | | O = EBCDIC. | 
| | | | X : 1 = OMR or RCE, (Note 3) | 
| | | | O = neither. | 
aN | | |B'HOBOOO10' |Read command code (2560, 5424/5425). | 
7 \ | | | |H : 0 = hopperl, 1 = hopper2. | 
wast | | | |B : 0 = EBCDIC, 1 = column binary. | 
| | | | 
| 79 | | | Control command code | 
| (4F) | | | (not for 2560 or 5424/5425). | 
| | |B'HOBOOO10' | Read command code | 
| | | | (2560, 5424/5425). | 
| | | | | 
| 80-83 | | | Address of IOAREA2. | 
| (50-53)| | | (If IOAREA2 is not specified, | 
| | | | address or IOAREA1.) | 
| | 
| 84 | o | | 1 = 2560; | 
| (54) | | | 0 = other. | 
| |} 1 | | 1 = 5424/5425; | 
| | | | 0 = other. | 
| | 2-7 | | Not used. | 
| 85-87 | | | Address of EOF routine. | 
| (55-57) | | | | 
| | | | | 
| 88-95 | | | Read CCW. | 
| (58-5F) | | | | 
| | | | | 
| 96-99 | | LA a 1Onre ,0(14)| Load user pointer register. | 
| eed | NOP | | 

1s | 100-103] |MVC O(&BLKSIZE,| Move IOAREA to WORKA. 

5 | (64-67) | | 13),0(14) | | 
_g/ | | |NOP 0 | | 
—— | | | | 
| 104-105 | |DC x'oooo' | | 
| (68-69) | | | | 


| The following bytes (50-57) are used for 3505, and 3525 | 
| associated files. | 


| 50-53 |DC A(name) | If ERROPT=name (Note 2) | 
| (32-35) |B 16(15) | If ERROPT=SKIP. 

| |B 20(15) | I£ ERROPT=IGNORE. | 
|Dc F'o' | If ERROPT=omitted. | 
| | | | 
| 54-57 | |DC AC(ASOCFLE) | Address of associated DTF table. | 
| (36-39) | | | (3525 only). (Note 7) | 


| Bytes 40 onward as used for 2560 and 5424/5425 files. | 


| 40-47 | | | Stacker select CCW (2560). | 
| (28-2F)| | | Read CCW (5424/5425). | 
a a Se te eh 
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DTFCD (Input - Reader) (cont...) 
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| Bytes* | Bits | Contents | Function | 
| 48-51 | |LA &IOREG,0(14) | | 
| (30-33) | |NOP 0 | | 
| | | | | 
| 52-57 | |MVC O(&BLKSIZE,| Move IOAREA to WORKA. | 
| (34-39) | | 13),0(14) | | 
| | [NOP 0 | | 
| | {pc x'o000' | | 
| | | | 
| 58-63 | |CLC 0(L,14), | Test for end of file. | 
| (3A-3F) | | 64(1) | L=4 if MODE=E; | 
| | | | L=2 in other cases. | 
| | | | | 
| 64-67 | |DC : | End-of-file indicator if MODE=E. | 
| (40-43) | |Dc neous | In other cases. | 
| | | | | 
| 68-71 | {DC A(name) | If ERROPT=name. (Note 2) | 
| (44-47)| |B 16(15) | If ERROPT=SKIP. | 
| | |B 20(15) | If ERROPT=IGNORE. | 
| | {Dc F'o' _ If ERROPT=omitted. | 

| 
| The following bytes are added for 2560 or 5424/5425 | 
| associated files. | 
esa + | 
| 72-75 | |DC A(ASOCFLE) | Address of associated | 
| (48-4B) | | | DIF table (Note 7) | 
| | | | 
| 76-81 | [MVC O(&BLKSIZE,| Move card image to IOAREAI. | 
| aes | 14) ,82(1) | | 
| 82 | |DC &BLKSIZE | Buffer for card image. | 
or a | ct | | 
}-——_ 11 ees 4 
| | 
| Notes: | 
| | 
| 1. OMR only for 3505. | 
| | 
| 2. ERROPT for 2560, 3505, 3525, or 5424/5425 READ file. | 
| | 
| 3. 3505, and 3525 with or without CONTROL=YES specified. | 
| | 
| 4. 2560, 3525, or 5424/5425 with or without CONTROL=YES specified. | 
| | 
| 5. 2560, 3525, or 5424/5425 without CONTROL=YES specified. | 
| | 
| 6. Defaults to pocket2 for 3505 and 3525. | 
| | 
| 7. Present only when 2560, 3525, or 5424/5425 associated files | 
| are specified for the input DTF. | 
L I 


* Numbers in parentheses are displacements in hexadecimal notation. 
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Py es ale ee, oa) hy, i 
“ Bytes* | Bits | Contents | Function | 
SS a 
0-15 | | | CCB. 
ee | | 
16 | Oo | | Not used. 
(10) | 1 | | 1 = ERROPT; (Note 3) | 
| | | 0 = omitted. 
| 2 | | COBOL open; ignore option. | 
| | | 1 = PUT issued; (Note 2) 
| | | 0 = PUT not issued. 
| 4 | | DTF table address constants 
| | | | relocated by OPENR. 
| | | | 
| | | | File Association: 
| | 5-7 | | 000 = PUNCH only 
| | 011 = PUNCH/PRINT (Note 3) 
| | 001 = READ/PUNCH (Note 3) 
| | 101 = READ/PUNCH/PRINT (Note 3) 
| 100 = PUNCH/INTERPRET (Note 3) 
| 
17-19 | Address of logic module. 
(11-13) | 
| 
20 (14) x'04' | DTF type. 
| 
21 0 | 1 = open; 0 = closed. 
| (15) 1 | First time switch. 
| 2 | 1 = CTLCHR. 
3 | 1 = fixed unblocked. 
4 | 1 = variable unblocked. 
5 | 1 = 2 I/O areas. 
6 | 1 = work area. 
7 | 1 = 2 CCWs in table. 
7 | 0 = 1 CCW in table. 
| 
22 !B'SSFOOOO1' | Normal command code. 
(16) | SS: 00 = pocket1; 
01 = pocket2; 
| 10 = pocket3. (Note 4) 
| F : 1 = column binary 
| 0 = EBCDIC. 
iB'HSSSOO11' | Normal stacker select command code 
| (2560 or 5424/5425). 
| | H : 0 = hopperl, 1 = hopper2. 
| | SSS: stacker information. 
| | | 
23 | Control command code 
PGPZ) | (not for 2560 or 5424/5425). 
| | iB'HSSSo0i1" | Actual stacker select command code 
| | (2560 or 5424/5425). 
| 
| 24-27 | {DC A(IOAREA1+x)| Address of data in IOAREA1. 
(18-1B) | i 
| 
1 
| 28-31 | Bucket. (Note 1) 
(1C-1F) | | 
| | 
32-33 LR 12,(RECSIZE)} Undefined records only. 
(20-21) |NOPR 0 | 
| 
1 
34-37 [LA &IOREG,4(14)| Load user pointer register. 
(22-25) iNOP O i i 
1 a 1 : 
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DTFCD (Output - Punch) (cont...) 


| Bytes* | Bits | Contents | Function | 
pe ey 
| 38 | o-2 | | Not used. | 
C2 ee oe | | 1 = 5424/5425. | 
| [| 4 | | 1 = 2560. | 
| | 5 | | 1 = 3525. | 
| |} 6 | | 1 = 1442 or 2596. | 
| oy | | 1 = 252081. | 
| | | | | 
| 39 (27)| |pc ct ' | Blank for eject last card. | 


| For all files except 2560 and 5424/5425 files. | 


| 40-47 | | | Punch CCW. | 
| (28-2F) | | | | 
| 48-55 | | | Eject CCW for last card if 2520. | 
| (30-37) | | | | 


| For 2540 files if CRDERR is specified. | 


| 48-55 | | | Retry CCW. | 
| (30-37) | : | | 
| 56-135 | |DC cL8o' ' | Save area card image. | 
| (38-87) | | | | 


| 48-55 | | | Load CCW. | 
| (30-37) | | | | 
| | | | | 
| 56-63 | | | Print CCW. | 
pane ee. | | 
| 64-127 | |DC 64c' | Print buffer. | 
| (40-7F) | | | | 


| For 3525 Associated files. 


-——_——— ‘ 
| 
1 


DC A(ASOCFLE) Pointer to associated file. 


| 
30-33) | | 


| For 2560 and 5424/5425 files. 


40-47 | | 
(28-2F) | {Dc D'o’ 


Eject CCW. 
If FUNC=RP or RPW. 


Stacker select CCW 


56-63 Punch and Feed CCW. 


For 2560 Punch/Interpret files. | 


——— ————_—— 


| 

f a 

| 64-71 | | | Load print head buffer one CCW. | 
| (40-47) | | | | 
| | | | | 
| 72-79 | | | Load print head buffer two CCW. | 
| (48-4F) | | | | 
| | | | | 
| 80-87 | | | Print CCW. | 
| (50-57) | | | | 
| | | | | 
| 88-151 | |64c' ' | Save area for printing line 2. 

| (58-97) | | | | 
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DTFCD (Output - Punch) (cont...) 


(=, ete hs Se 7 
| Bytes* | Bits | Contents | Function | 
| For 5424/5425 Punch/Interpret files. 


| 64-71 | | | Print CCW. | 
| (40-47) | | | 


J_ 
| For 2560 and 5424/5425 Associated files. | 


| 64-67 | |DC ACASOCFLE) | 

yj Pom | 

| 68 | jpc c' ' | If mode is EBCDIC. 

| (44) | |DC x'oo' | If mode is Column Binary. 
| | | | 

| 69- | |DC &BLKSIZE | Buffer for card image. 

| (45> 9] [Noe BGs | 


Zz 
° 
ct 
oO 
a 


1. The bucket bytes handle undefined length records. 


. Valid for 2560 or 3525 READ/PUNCH, PUNCH/PRINT, and 
READ/PUNCH/PRINT files. 


3. Valid for 2560 or 3525 only. 


4. Defaults to pocket2 for 3525. 


i) 


[ 


* Numbers in parentheses are displacements in hexadecimal notation. 
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DTFCD (Combined - Reader/Punch) 


(ee T Ss] 
| Bytes | Bits | Contents | Function | 
Sap ee 
} O-15 | | | CCB. | 
| (00-OF) | | | | 
| | | | | 
| 16 | o-1 | | Not used. | —_—_, 
| (io) | 2 | | COBOL open; ignore option. | 
| | 3 | | Not used. | . j 
| |} 4 | | OPENR relocates | No 
| | | | DTF address constants. | 
| | 5-7 | | Not used. | 
| | | | | 
| 17-19 | | | Address of logic module. | 
| (11-13)| | | | 
| | | | | 
| 20 | |x'oo' | DIF type. | - 
fey Pe | 
| 21 | | Command code (X'02' for 1442, | ne 
1.159 | | | X'C2' for 2520, 2540). | * 
| | | | | 
| 22 | | | Command code (X'01' for 1442, | 
| (16) | | X'09' for 2520, 2540). | 
| | | | 
| 23 | | Command code (X'01' for 1442, 
2.495 | | X'09' for 2520, 2540). | 
| | | | 
| 24-31 | | | ccw. | 
| (18-1F) | | | | 
| | | | | 
| 32-35 | | Input area address. | 
i ! 
| 36-39 | | Output area address. 
| (24-27) | | 
| 40-41 | Input block size. | 
| (28-29) | | | 
| | | | | 
| 42-43 | | Output block size. | 
| (2A-2B) | | | 
| 44-49 |MVC O(&BLKS, | 
| (20-31) | 13),0(14) | oe 
il | | | ff 
| 50-55 | [MVC O(&OUBL, | 
| (32-37) | | 14) ,0(13) | AS 
| | | | . 
| 56-59 | | End-of-file address. | 
| (38-3B) | | 
{| 60-67 | | Save area. | 
| (30-43)! | | 
| | | | 
| 68-73 [MVC 1(&OUBL-1, | | . 
| (44-49) | 13),0(13) | a 
| | | \. 
| 74~77 |MVI 0(13),X"40' | es 
| (4A-4D) | | 
| | | | | 
| 78-79 | | Constant (blanks). 
| wae | | 
| | 
| 80-83 | | Constant address | 
| (50-53) | | (bytes 78-79). | i 
_] 6 
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a ~\ 
i ) DTFCN (Console) 
f me a 71 
| Bytes* | Contents | Function 
f + = 
{ 0-15 | CCB. 
| (00-OF) | | | 
| 16 x'20' | COBOL open; ignore option. 
(10) x'08' | DIF table address constants | 
| | | relocated by OPENR. 
| | | 
| 17-19 | Address of logic module: | 
(11-13) | GET and PUT logic if TYPEFLE=INPUT; 
| | PUT logic if TYPEFLE=OUTPUT; | 
| | GET, PUT, and PUTR logic if 
| TYPEFLE=CMBND. 
| | 
20 x'03! | DTF type. 
Ae | (14) | 
co a | 
: : | 21-23 | For input and output: not used. | 
een | (15-17) | | For combined: 
| | 
| | byte 21 contains X'0O1' | 
| | | bytes 22-23 contain INPSIZE. 
| | | 
| 24-31 |X'09',IOAREAI, | CCW. 
| (18-1F) X'00',BLKSIZE | 
be i i 
| End of table if RECFORM=FIXUNB and WORKA not specified. | 
_ 
| The following bytes are added to the table if WORKA is specified. 
55 ex a 
32-35 |DC A(IOAREA1) | Address of I/O area. 
(20-23) | | 
| | 
36-39 |DC F‘'O' | Register save area. 
(24-27) | 
| | | | 
40-43 |DC F'O' | Register save area. | 
(28-28) | | 
Si 1 a4 
| End of table if RECFORM=FIXUNB. | 
} 
The following bytes are added to the table if RECFORM=UNDEF. 
Ee =a <j | 
pc F'o' | Register save area. 
‘ | 
j {DC F’0' | Register save area. 
od 1 | | | | 
| DC H'BLKSIZE' | I/O area size. | 
| 
| [DC AL2(BLKSIZE-1) | For input files only. 
: | 
The following bytes are added to the table if TYPEFLE=CMBND 
7 8s ar a =| 
| 32-35 DC ACIOAREA1 | I/O area address for input. 
| (20-23) +BLKSIZE) | | 
| | 
| 36-37 |DC H'BLKSIZE' | Block size. 
| (24-25) | | 


a i Ne ee 


* Numbers in parentheses are displacements in hexadecimal notation. 
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0-5 
(00-05) 


6-7 
(06-07) 


8 (08) 


9~11 
(09-0B) 


12-15 
(OC-OF} 


{17-19 
| (11-13) 


}20 (14) 


| 31-33 

| (1F-21) 
| 

| 34-35 

| (22-23) 
| 

| 36-39 

| (24-27) 
| 

|40-41 

| (28-29) 
| 

|42-43 

| (2A-2B) 
| 


[44-45 
| (20-2D) 
| 


| 46-49 
| (2E-31) 


— 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


NOU & 


| ae Pes pe al 
| Bytes* | Bits | 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


Function 


CCB indicators. 


Logical class and unit numbers 
(primary if DUAL addressing). 


Zero. 


CCW address. 
Zeros. 


Not used. 

COBOL open; ignore option. 

Not used. 

DIF table address constants relocated by OPENR. 
Not used. 


Address of logic module. 


DIF type = X'OB' 


Logic module option switches. 
User disengage — 0 = off; 1 = on. 
Program sort mode — 0 = no; 1 = yes. 
First time switch (after engage) — 
0 = no; 1 = yes. 
Addressing = DUAL — 0 = no; 1 = yes. 
Waiting — 0 = no; 1 = yes. 
Read logic indicator — 0 = no; 1 = yes. 
Not used. 
Supervisor initial read (after open) — 
0 = no; 1 = yes. 


tot 


Symbolic filename. 


Open/Close option switch. 


Open indicator — 0 = closed; 1 = open. 


Open/Close option switches. 


Logic module option switches. 


Error information status. 


Length of DIF table. 


Device type indicator. 


Record type. 


Reserved for future use. 


a ] 
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i a 

| Bytes* | Bits | Function 

a 

}50-51 | | I/O register. 

per | | 

{52-55 | | End-of-file address. 

| (34-37) | | 

156-59 | | IOAREA2/1 address. 

| (38-3B) | | 

{60-63 | | Document buffer size. 

| (3C-3F) | | 

[64-65 | | Blocking factor/Number of buffers. 

enon | | 

|66-67 | | I/O area size. 

| (42-43) | | 

[68-71 | | Record length. 

aie | | 

|72-76 =| | Sense information. 

| (48-4C) | | 

177 | | Supervisor switch. 

[(4D) | | 

| | | 

|78-79 | | Logical class and unit numbers 

| (4E-4F) | | (secondary — for DUAL addressing only). 

| | | 

| 80-81 | | Register alignment bytes. 

| (50-51) | | 

|s2-83 | | Logical class and unit numbers 

| (52-53) | | (primary — for DUAL addressing). 
| | 

[84-87 | | Document buffer size. 

| (54-57) | | 

[88 (58) | | Command code (4C). 
| | 

[89-91 —s | | Address of last byte of first document buffer. 

oeidieg | | 

[92 (5C) | | Command code (4C). 

| | | 

|93-95 | | Address of last byte of last document buffer. 

oa | | 

|96-99 | | Stacker-select routine address. 

| (60-63) | | 

[100-103 | | Address of stacker select CCW chain. 

haat | | 

{104-107 | | Current buffer address pointer (Supervisor). 

! (68-6B) | | 

|108-111 | | Supervisor count. 

| (6C-6F) | | 
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DTFMR (MICR) (cont...) 


| Bytes* 


| 112-113 
| (70-71) 


114-115 
(72-73) 


116-119 
(74-77) 


120-121 
(78-79) 


122-123 
7A-7B) 


( 
124-127 
(7C-7F) 


128-131 
(80-83) 


132-139 
(84-8B) 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
[140-143 
| (8C-8F) 


| 
| 144-147 
| (90-93) 


| 148-159 
| (94-9F) 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


Function 


Number of buffers minus 7. 


Message 


indicator. 


ERROPT routine address. 


Logical 


class and unit numbers 


(secondary — for DUAL addressing only). 


Reserved for future use. 


Address 


Address 


Channel 


Address 


of last buffer given to user. 


of first byte of last buffer. 


status word (CSW). 


of active GET record. 


GET counter. 


Reserved for future use. 


| For SINGLE Addressing 


| 160-167 
| (AO-A7) 


{168-175 
| (A8—-AF) 
| 

| 176-183 
| (BO-B7) 
| 

| 184-191 
| (B8-BF) 
| 

|192-199 
| (CO-C7) 
| 

| 200-207 
| (C8-CF) 
| 

{208-215 
| (DO-D7) 


| 216-223 
| (D8-DF) 


[224-231 
| (EO~E7) 
| 

| 232-239 
| (E8-EF) 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


CCW — Engage. 
CCW — Read. 
CCW — Sense. 
CCW — NOP. 


CCW — Stacker select. 


ccw — TIC. 


CCW — Control. 


CCW — BN. 
CCW — Read. 
CCW — Sense. 
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DTFMR (MICR) (cont...) 


fo.) es ee | 
| Bytes* | Bits | Function | 
{240-247 | | CCW - Disengage. | 
|(FO-F7) | | | 


| 


| For DUAL Address Adapter | 

| 160-167 | CCW — Engage. 
—w | (A0-A7) | 
| 
| 
| 


| 
| | | 
[168-175 | CCW — Read buffer 1. 
hgal | | 
|176-183 | | CCW — Sense. | 
eee | | | 
oo {184-191 | CCW — NOP. | 
ie \ | (B8-BF ) | 
te es | | 
| 192-199 | CCW — Read buffer 2. 
eee | | 
200-207 | | CCW — MOD sense. 
(C8-CF) | | 
| | | 
| 208-215 | CCW — Read buffer 1. 
(DO-D7) | | 
| | 
| 216-223 | CCW — MOD sense. | 
(D8-DF) | 
| | 
{224-231 | | CCW - TIC to NOP. 
(EO-E7) | 
| | 
| 232-239 | CCW — NOP. 
(E8-EF) | | 
| 
240-247 CCW — MOD CTL. | 
(FO-F7) | 
| | 
248-255 | | CCW -— Stacker select. | 
(F8-FF) | 
| 
256-263 | | CCW — MOD sense. | 
(100-107) | | 
H aah aera bee J 
a * Numbers in parentheses are displacements in hexadecimal notation. 
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DTFOR (Optical Reader) a. 
Fos ae ope ae en OS ee eg ee eS ee eT ee ee eT] 
| Bytes* | Bits | Function | 
| o-15—| | Dummy CCB. | 
| (00-OF) | | - | 
| | | | 
| 16 | 0-1 | Not used. | 
{| (10) | 2 | COBOL open; ignore option. | 
| | 3 | Not used. | Y 
| | 4 | DIF table address constants relocated by OPENR. | 
| | 5-7 | Not used. ; | 
| 17-19 | | Address of logic module. | 
a | 
| 20 | | DIF type, (X'09'). | 
| (14) | | DIF type, (X'OA' if HEADER=YES). | 

| 

| 21 | | PIOCS switches. | 
| (15) | O | 1 = Open; 0 = Closed. | 
| | 1 | 1 = Input. | 
| | 2 | 1 = Control. | 
| | 3 | 1 = Device is 1287. | 
| | 4 | 1 = Header. | 
| | 5 | Reserved for future use. | 
| | 6 | 1 = RDLNE. | 
| | 7 | Not used. | 
| 

| 22 | | Not used. | 
| (16) | | | 
| | | | 
| 23 | 0-6 | Not used. | 
| (17) | 7 | 1 = LIOCS posts a hopper empty condition to DIF. | 
| 24-39 } | CCB. | 
| on) | : | 
| 40-47 | | Sense CCW. | 
Se) | 
| 48-51 | | Lost lines (equipment check). | 
| (30-33) | | | 
| | | | 
| 52-55 | | After nine retries for journal tape, | 
| Ore | or after two retries for documents. | 
| 56-59 | | Wrong-length records. | 
| (38-3B) | | | 
| | | | 
| 60-63 | | After four retries for journal tape, | 
| ae | or after two retries for documents. | 
| | 

| 64-67 | | Keyboard corrections. | 
| (40-43) | | | 
| | | | 
| 68-71 | | Count of data check errors. | 
| (44-47) | | | 
| | | | 
| 72-75 | | Lines marked. | 
Bay | 
| 76-79 | | Total lines read (CCW chains executed). | 
| (4C-4F) | | | 
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DTFOR (Optical Reader) (cont...) 


| Bytes* | Bits | Function | 


80 Error indicators. 


| | | | 
| (50) | Oo | 1 = EOP. 
| | 1 | 1 = Lost reference mark indicator. | 
| | 2 | 1 Late stacker selection. | 
| | 3 | 1 = Non-recovery error. | 
| | 4 | 1 = Equipment check. 
| {| 5 | 1 = Wrong-length record. | 
| | 6 | 1 = Hopper empty. | 
| | 7 | 1 Data check. | 
| | | | 
| 81 | | LIOCS switches. | 
| (51) {| oO | 1 = First time. | 
| | 1 | 1 = Two I/O areas. | 
| | 2 | 1 = WORKA=YES | 
| | 3 | 1 = RECFORM=FIXUNB | 
| | 4 | 1 = RECFORM=UNDEF | 
| | 5-7 | Not used. | 
| | | 
| 82 | | Normal command code. | 
| (52) | | | 
| | | | 
| 83 | | Control command code. | 
= ee | | 
| | | | 
| 84-87 | | IOAREA2 address. | 
haa | 
| 88-95 | | Read CCW. | 
Sn) | 
| 96-103 | | Go to next line CCW. | 
eo) | 
[104-111 | | Control CCW. | 
ned : 
{112-115 | | EOF address. 
| (70-73) | | | 
{116-119 | | Correction exit address. 
ieee me 
|120-123 | | IOAREA1 address. | 
oe | | | 
| | 
| 124-127 | | DC A(&BLKS-1) | 
er) | | | 
| 
| 128-129 | | SR 13,&RECS | 
oaks | | | 
| 
{130-131 | | LR &RECS,13 | 
| (82-83) | | | 
{132-133 | | LR &IOR,13 | 
| (84-85) | | | 
}134-135 | | Sense. | 
| (86-87) | | | 


a a 


* Numbers in parentheses are displacements in hexadecimal notation. 
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DTFDR (3886 Optical Reader) 


| Bytes* | Bits | Contents | Function | 
| 0-15 | | | CCB. | 
| aie | | | 
| 

| 16 | o-1 | | Not used. | 
i; qo» | 2. | | COBOL open; ignore option. | 
| | 3 | | Not used. | 
| [| 4 | | OPENR relocates DTF table addresses. | 
| | 5-7 | | Not used. | 
| | | 

| 17-19 | | | Address of logic module. | 
| (11-13) | | | | 
| | | | | 
| 20 | [x'oc' | DTF type. | 
| (14) | | | | 
| | | | | 
| 21 | | PIOCS switches: | 
| (15) | oO | | 1 = open; 0 = closed. | 
| J 1 |Bt1' | Input. | 
| | 2-5 |B'oooo' | Not used. | 
| | 6 |Btit | Device is 3886. | 
| | 7  |Bto! | Not used. | 
| | | | | 
| 22 | | | Not used. | 
(16) | | | 

| | | | | 
| 23 | | | LIOCS switches: | 
| (17) | 0-4 |{B‘'ooo00' | Not used. | 
| bos: | 1 = SETDEV. | 
| | 6 | | 1 = Control passed to COREXIT. | 
| | 7 | 1 = FR loaded from disk. | 
| | | 

| 24-31 | | | FR phasename at open time. | 
(18-1F) | | | 

| | | | | 
| 32-39 | | | Phasename of currently used FR. | 
| (20-27) | | | | 
| | | | | 
| 40-43 | |X'oooo0000' | Not used. | 
| (28-2B) | | | | 
| | | | | 
| 44-47 | | | Start address of FR area in DTF. | 
| (2C-2F)| | | | 
| | | | | 
{| 48-51 | | | Address of 4-byte pointer at the | 
| (30-33) | | | end of the FR area in the DTF. | 
| | | | | 
| 52-55 | | | EOF routine address. | 
| (34-37) | | | | 
| | | | | 
| 56-63 | | | Scan CCW. | 
| (38-3F)| | | | 
| | | | | 
| 64-71 | | Read CCW. | 
| eer | | 
| | 

| 72-79 | | Control CCW. | 
| (48-4F) | | | 
| | | | 
| 80-87 | | Load format record CCW. | 
| (50-57) | | | | 
| | | | 
| 88-91 | | | COREXIT routine address. | 
| (58-5B) | | | 
Ui wi a a ee Se ee ee peek ti) 
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E. a DTFDR (3886 Optical Reader) (cont...) 


T 


T 


| Bytes* | Bits | 


| 
| 
| 
| 
| 
| 
| 


92-95 | 
(5C-5F) | 

| 
96-99 | 
(60-63) 


100-103 
(64-67) 


104 
(68) 


105-107 
(69-6B) 


108-111 
(6C-6F) | 


Function 


Da ic Ca in a i a 


= 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
1 


IOAREA1 area address. 


Seren Oar 


Header area address. 


Exit indicator address. 


Start of DR area. 


Header area address. 


Exit indicator address. 


Start of FR area. 


* Numbers in parentheses are displacements in hexadecimal notation. 
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DTFPR (Printer) 


f 


ae ~T 
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real DTf. 


0-15 | 
(00-OF) | 
| 


16 
(10) 


17-19 
(11-13) 


20 
(14) 


21 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
(15) ! 
| 
| 
| 
| 
| 
| 


22 (16)| 


| 
23 (17)| 
| 


24-27 | 
(18-1B) | 


NOUFWNrH OO 


Bytes* | Bits | Contents 


VERSION3 prefix: 


|x'0008' 
| 


|x'0000' 


[x'09" 
| 


[x'09' 


|DC A(IOAREA1+x) 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


Function | 


For printer devices an 8 byte prefix is generated in front of the | 


length of DTFPR extension | 
| 
reserved | 
| 
| 


address of DTFPR extension 


CCB. If 3800 extended buffering is 

selected, the CCW address is changed 
by OPEN to point to a DIF extension 

work area in the user virtual area. 

CLOSE restores it. 


1 = 2-line printer; (Notes 3,4) 
0 = other. 

1 = ERROPT; (Notes 3,4) 
O = omitted. 


COBOL open; ignore option. 
1 = 3525; 0 = other. 
OPENR relocates DIF address 


constants. 
3525 Modes: 
000 = PRINT only 
011 = PUNCH/PRINT (Note 3) 
010 = READ/PRINT (Note 3) 
101 = READ/PUNCH/PRINT (Note 3) 


3800 Modes: (Bits 5 and 6) 
11 = TRC=YES specified on DIF. 


(Note 7) © 
01 = TRC=Y specified via SETPRT 
(set by OPEN). (Note 7) 


non 3525 Modes: (Bit 7) 
1 = indicates that Version 3 


extended buffering is selected or 
the actual device is a PRT1 printer, 
OPEN changes this address to point 
to extended buffering logic module 
IJDPR3 or to the PRT1 logic module 
IJDPRT in system virtual area. 

CLOSE restores it. 


DTF type. 
DTF type for 2560 and 5424/5425. 


1 = open; 0 = closed. 
First time switch. 


1 = Control character. 

1 = Fixed unblocked records. 

1 = Variable unblocked records. 

1 = Two I/O areas. 

1 = Work area. 

1 = Print overflow channel 9. 
Normal command code. (Note 5) 
Control command code. (Note 5) 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
Address of logic module. If 3800 | 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
Address of data in IOAREA1. | 
| 
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| For printer and card punch devices. 


28-31 | 
(10-1F) | 


32-33 | 
(20-21) | 


34-37 
(22-25) 
(26-27) 
40-47 


| 
| 
| 
| 
| 
| 
(28-2F) | 
| 
| 
| 
| 
| 
| 
| 
| 
| 


48-55 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 38-39 
| 
| 
| 
| 
| 
| 
| 
| (30-37) 


end+1 


T 
| 
| 
| 
12, (RECSIZE) | 
PR 0 | 
estan Guia 
PO 


LR 
NO 
LA | 
NO | 
| 

| 

| 

| 
11,*,X'60' | 
9, IOAREA, x! 56" | 
1d | 

| 

9, IOAREA,X'20' | 
5121 | 
AGlame) | 
| 

| 

| 

| 


DC ACASOCFLE) 


| 
| 
| 
| 


Address of user error routine 


(for all the 3211—compatible 


printers identified by device 


type code PRT1). 


“ 
Function | 

| 

{ 

Bucket. (Note 1) | 
| 

| 

For undefined records only. | 
| 

| 

Only if IOREG=(r). | 
| 

| 

Bucket. (Note 2) | 
| 

| 

CCW —- Set up Selective Tape List | 
Control. (Note 6) | 
STLIST not specified. | 
| 

CCW — STLIST specified. (Note 6) | 
| 

| 

| 

| 

| 

| 


If ASOCFLE=filename. 


Flag for CTLCHR specification: | 


CTLCHR=ASA specified 
CTLCHR=YES specified 
reserved 


| For the 2560 and 5424/5425 Multifunction Card Machine. 


oS SS SS SS Se 


22 
(16) 


23 
(17) 


| 
| 
| 
| 
| 
| 
| 
| 24-27 

| (18-1B) 
| 

28-31 
(1C-1F) 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
32-33 | 
(20-21) | 
| 

34-37 | 
| (22-25) | 
| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 


38-39 
(26-27) 


40-43 
(28-2B) 


44 
(20) 


0 
1 
3 


}X'00' 
| 


B' HHHHHHOO' 


| 
| 
| 
| 
| 
| 
E) 


LR 12, (RECSIZE) 
NOPR 0 


LA &IOREG,4(14) 
NOP 0 


2 a 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
Dc 
\D ‘o' 
ii 

| 

| 

| 

| 


Not used. 


Print head selection byte. 


H = 1 specifies the corresponding 


head. 


Address of IOAREA1. 


Bucket. 


For undefined records only. 


Only if IOREG=(r) 


For printer devices behind the end of DTFPR (pointed to by the | 
VERSION3 prefix): 
DTFPR extension 


Number of bytes to be printed by 


If FUNC=RW, PW, or RPW. 
In all other cases. 


1 = 2560. 
Not used. 


1 = print control switch for 2560 


associated files. 


| 
| 
| 
| 
| 
| 
| 
| 
the last specified print head. | 
| 
| 
| 
| 
| 
| 
| 
| 


a Ee 9 et sf 


Chapter 3. 


IOcs 


(General) 


3-51 


Licensed Material - Property of IBM 


DTFPR (Printer) (cont...) 


© Copyright IBM Corp. 


For 2560 simple files. 


_— T T ee cae ll 
| Bytes | Bits | Contents | Function | 
es ana ! 
| For the 2560 and 5424/5425 Multifunction Card Machine (cont'd.) | 
| oi | ! 
| | 4-7 | | Not used. | 
| | | | | 
| 45-47 | {Dc 3x'00' | Reserved for future use. 
| (2D-2F)| | | | 
| \ 1 _t | 
| | 


] 
| 48-55 | | | Eject CCW. | 
| (30-37) | | | | 
| 56-63 | | | Load print head buffer CCW. | 
| (38-3F) | | | | 
| | | | | 
64-71 | | | Print CCW. | 
(40-47) | | | | 
! 4 
| For 2560 associated files. | 
T al paar a 
48-55 | | Load print head buffer CCW. | 
4 | | 
| 56-63 | | | Print CCW. | 
| (38-3F) | | | | 
| For 5424/5425 files. | 
| 48-55 | | | Print CCW. | 
| (30-37) | | | 
ft 
Notes: 
1. The bucket bytes handle undefined records. Bit 0 of byte 28 at 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
Le 


open time determines the mode set of a printer with UCS. If bit 
0 is 1, the mode is set so that data checks occur if an invalid 
character is printed. Otherwise, mode is set to suppress data 
checks. The use of the UCS parameter determines the setting of 
this bit. If STLIST=YES, byte 31 saves the STLIST control byte 
provided by the PUT macro. 


. The 2 byte bucket saves print overflow conditions if CTLCHR=ASA. 
If STLIST=YES, byte 38 contains the current STLIST control byte. 
Byte 39 is set by the PUT macro to indicate spacing or skipping. 


(X'00' no spacing, no skipping; X'01' spacing; X'02' skipping.) 
& 


. Valid for 3525 READ/PRINT, PUNCH/PRINT, and READ/PUNCH/PRINT 
files. 

. Valid for 3525 PRINT only files. 

. X'05' for 3525, X'09' for other devices. 

. Valid for 1403 only. 

. Valid for 3800 only. 


* Numbers in parentheses are displacements in hexadecimal notation. 
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| 
| 
| 
| 
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DTFCP (DISK=YES - Compiler) 


[ T T = 
| Bytes*| Bits | Function | 
rere Sanu 

— —— 

| 8-byte header preceding the DTF | 

+ 

| o-3 | | Reserved | 
| 4-7 | | Address of the Version 3 area of the DTF (Note 1) 

0-15 CCB If the file is on a Disk device, the CCW address 


in bytes 9-11 (9-B) is changed by OPEN to point 
to a DTF extension in the user virtual save area. 
CLOSE restores it. If 3800 extended buffering is 
selected, the CCW address is changed by OPEN to 
point to a DIF extension work area in the user 
virtual area. CLOSE restores it. 


Not used. 

Set by MAINT; indicates that LIOCS must retrieve 
extents from the VTOC instead of the label cylinder. 
COBOL open; ignore option. 

X'10' indicates an unlabeled FORTRAN tape. 

DIF table address constants relocated by OPENR. 

Used by FORTRAN (Sequent. Disk Backspace and Rewind). 
1 = ASCII, 0 = EBCDIC. 

FORTRAN is calling DTFCP. 


NDU WH 


Logic module address. If the file is on a Disk 
device, OPEN changes this address to point to the 
logic module residing in the system virtual area 
(SVA). CLOSE restores it. If 3800 extended 
buffering is selected, OPEN changes this address to 
point to the extended buffering logic module IJDPR3 
in the system virtual area. CLOSE restores it. 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
DIF type X'32', except in the case of disk assigned | 
to units other than SYSLNK. In this case, DTFCP | 
open changes it to X'20’. 
| 
Open indicators: X'02' input, X'00' output, except | 
for tapes assigned to SYS000 to SYSnnn when | 
X'00' = input and X'08' = output. 
X'08' DISK=YES indicator. | 
1 = no rewind, 0 = rewind. | 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


Filename (see byte 29). 


pevacs type code: 
X 00 
x'o1' 
x'04' 
x'05' 
X'07' 


2311 x'08' 
2314, 2319 x'09' 
3330-1,-2 X'OA' 
3330-11 x'45' 
3350 x'90' 


3340 general 
3340 35MB 
3340 70MB 
3800 with TRC 
3310, 3370 


oil 


30-35 

| (1E-23) 
| 
| 36-37 

(24-25) 
| | 
[38 (26)| 


| 
139 (27)| 
| | 


File address for disk; block count if bit 7 of byte 
16 is on. 


Volume sequence number or work area. 


Open switch. 


Sequence number of current extent. 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 

[40 (28)| | Sequence number of last extent, or X'80' 

| if 1442 punch. 

Note: The Version 3 area is described in VSE/Advanced Functions 

Diagnosis Reference: LIOCS Volume 4, SAM for DASD. 
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r 1 Tr 
|Bytes* | Bits | Function 


[41 (29) | | X'80' indicates request for standard label tape OPEN. 
| | | 
[42 (2A) | | X'80' device is a 2560. X'10' device is a tape 
| | | X'40' DTF has been exten— X'08' device is a printer 
| | | ded into the user X'04' device is a punch 
| | | virtual save area. X'02' device is a reader 
| | | X'20' device is a Disk. X'O1' RPS is supported 
143 | | X'F3' device is a Disk. 
|(2B) | | X'F1' device is a reader. 
| | | X'FO' device is other type. 
| | 
44 | O | 1 = input, 0 = output. 
| (2c) | 1 | 1 = eject needed for a reader punch; 0 = no eject. 
| | 2 | 0 first pass, 1 = not first pass. 
| | 3 | 1 = two I/0 areas, 0 = one I/O area. 
| {| 4 | 1 = 2540 punch. 
| {| 5 | 1 = SYSLST or SYSPCH. 
| | 6 | 1 = SYSLST or SYSPCH on output tape. 
| | 7 | 1 = TLBL is present and tape is labeled. 
| | | 
|45-47 | | IOAREA2 address. 
en : 
| 48 | Oo | 1 = Always on. . 
| (30) | 1 | Reserved for future use. 
| | 2 | 1 = Version 3 DTF. 
| | 3-7 | Reserved for future use. 
| | | 
{49-51 | | Reserved for future use. 
1(31- ee | 
[52-53 | | Lower head limit. 
ais | 
sa xtent upper limit. 
[54-57 | | E pper 1 
ee a | 
|58-64 | | BBCCHHR seek address or physical block number for 
| (34-40) | | FBA Disk. 
| | | 
{65-67 | | EOF address. 
hua | 
}68-71 | | Control bucket CCHH; not used for FBA Disk. 
er ie | 
{72 (48)| | Number of records per track for output, number of 
| | | record per track +1 for input. 
| | | 
{73 (49) | X'00' for output, X'O1' for input. 
| | | 
|74-75 | | X'0020' for output, X'0018' for input for Disk. 
| (4A-4B) | | X'0008' for 2560 and 5424/5425 output. 
| | | X'0000' for nondisk device. 
| | | 
{76-80 | | CCHHR for count field; not used for FBA Disk. 
eer | 
{81 (51)| | Key length. 
| | | 
{82-83 | | Data length. 
eas | 
{84-87 | | Instruction to load user I/O area address to I/0 
| (54-57) | | register. 
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DTFCP (DISK=YES - Compiler) (cont...) 


a a Sa ar 
|Bytes* | Bits | Function | 
4 

| End-of-table if DIF is defined for an input file. 

ee 
|88~-111 | Seek, search, TIC CCWs; not used for FBA Disk. 
| (58-6F) | 
{112-119 | CCW for Disk input and first CCW for Disk output; 


| other devices if unit is not a Disk. 


| 


| 
| 
| 

| (70-76) | | not used for FBA Disk. This CCW can be used for 
wt | 
| | 
| 120-127 | | 
| | 
| 
| 
| 


| ree 


| When the CP open initializes the table and determines that the de- 
| vice is a 2540 punch, the following bytes in the table are changed: 


Second CCW for output. 
(77-7F) | 
| 
[128-151] Verify CCWs for output. 
| (80-97) | 
Ns eee ee 
ms, | End-of-table if DIF is defined for output file and DEVADDR does 
* | not equal SYSPCH. 
—— Psy ae 
}152-159| | 2540 punch error recovery CCW 1. | 
| (98-9F) | | | 
| 160-167 | | 2540 punch error recovery CCW 2. 
hee | | 
| 168-231] | Reserved. | 
| (A8-E7) | | | 
| 
| 
| 


aa 
{30 (1F)] | X'FF' indicator to DTFCP open phases and logic module| 
| | | 
|32-35 | | Instruction to load user I/O area to I/0 register. | 
| (20-23) | | | 
| | | | 
|48-55 | | CCW. 
aan 
[56-63 | | 2540 punch error recovery CCW 1. 
an 
[64-71 | | 2540 punch error recovery CCW 2. | 
igueee | | 
i {72-151 | | 80-byte card image, savearea 1. | 
ww | 
|152-231| | 80-byte card image, savearea 2. 
| (98-E7) | | | 


| When the CP open initializes the table and determines that the | 
| device is a 2560 or 5425, following bytes in the table are changed: | 
SS ee 


|32-35 | | Instruction to load user's I/O area to I/O register. 
go OS pee | | 
‘cm |48-55 | | First output CCW. | 
ade: | | 
| 
|56-63 | | Second output CCW. 
so) | 
|64 (40) | | Stacker select character V for ASCII. 
| | 
}65 (41)| | Stacker select character W for EBCDIC. | 


a ic af ES a ee En ae Ae es 
wy * Numbers in parentheses are displacements in hexadecimal notation. 
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| 1 Ty 71 
| Bytes*| Bits | Function | 
—} + 4 
[o-15 | | CCB. 
es wet | 
| 16 {| 0-1 | Not used. 
[c10) | 2 | COBOL open; ignore option. 
| | 3 Not used. 
| | 4 | DIF table address constants relocated by OPENR. 
5 Not used. 
| | 
| | 6 | 1 ASCII (used only if DISK=YES), 
| ° | | 0 = EBCDIC (used only if DISK=YES). 
| [a\ 67 FORTRAN is calling DTFCP. 
| | | 
[17-19 | | Logic module address. 
| (11-13) | 
| | | 
| 20 | DTF type X'32' except in the case of tape assigned 
| (14) | | to units SYSO00 to SYSnnn. In this case, a DTFCP 
| | | open phase changes it to X'10'. (Note 1) 
| | 
{21 | | Open indicators X'02' input, X'00' output (except 
| (15) | | for tapes assigned to SYS000 to SYSnnn when it is 
| | | x'00' input, X'08' output). 
| | 
|22-28 | | Filename (see byte 29). 
(16-1C) | 
| 
29 (1D)| | Device type code: X'45' = 3800 with TRC. 
30 (1E)| | Indicator to DTFCP open phases and logic module. 
| X'FF' for input files. 
| | x'00' for output files. 
| | 
31 (1F)| | Reserved for future use. 
| | 
{32-35 | | Instruction to load user's I/O area address into 
(20-23) | | I/O register. 
| | | | 
[36-37 | | Volume sequence number or work area. 
Nase: | | 
{38 a | Open switch. | 
| | 
{39 (27)| | Sequence number of current extent. | 
| | | 
140 (28)| | Sequence number of last extent, | 
| | | or X'80' if 1442 punch. | 
| | | | 
41 (29)| | x'20' | 
| | | 
[42 | | X'80' device is a 2560. | 
|(2A) | X'40' device is a 5424/5425. | 
| | | X'10' device is a tape. | 
| { X'08' device is a printer. 
| | | X'04' device is a punch. | 
| | X'02' device is a reader. 
| | [ | 
{43 | | X'F1' device is a reader or tape. | 
|(2B) | X'FO' device is other type. | 
| ER SCAS eed Ne eee eee Ee parecer ser | 


Note 1. DIF type X'30' found in DOS LIOCS Version 1 only. 
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DTFCP (DISK=NO) (cont...) 


[Pe aw > em ee ee ee ee ee ae a ee oe oe al 
| Bytes* | Bits | Function | 


pe ep 


|44 (2C) | O | 1 = input, 0 = output. | 
| { 1 | 1 = eject needed for a reader-punch, 0 = no eject. | 
| | 2 | 1= not first pass, 0 = first pass. | 
| |} 3 | 1 two I/O areas, 0 = one I/O area. | 
oh | | 4 | 1 = 2540 punch. | 
\ | | 5 | 1 = SYSLST or SYSPCH. 

of | | 6 | 1 = SYSLST or SYSPCH on output tape. | 
| | 7 | Reserved for future use. | 
| | | | 
| 45-47 | | IOAREA2 address. | 
nal ae 
[48-55 | CCW. | 
| (30-37) | | | 
aa S | End-of-table is DIF is defined as output file and DEVADDR is not | 
a | equal to SYSPCH. | 
ond Se ——5 
|56-63 | | 2540 punch error recovery CCW 1. | 
| (38-3F) | | | 

|64-71 | | 2540 punch error recovery CCW 2. 
| (40-47) | | | 
| 65-67 | | EOF address, input only. | 
|(41-43) | | | 
1 | 
| End~of-table if DTF is defined as input file. | 
aa | 

[72-151 | | 80-byte card image, save area 1. 
| (48-97) | | | 
| | | | 
{152-231 | | 80-byte card image, save area 2. | 
| (98-E7) yu | | 
- = 
If device is a 2560 or 5424/5425, bytes 56 onward contain the | 
ee information: | 
F — 
56-63 ai Ts Second output CCW. | 
Sapa ae 
[64 (40) | | Stacker select character V for ASCII. | 
| | | | 
65 (41) | | Stacker select character W for EBCDIC. | 
| | | 
[66-7 75 | | Reserved for future use. | 
ee | 
76-235 | | First I/O area. | 
(4C-EB) | | | 
| 
{236-237 | Reserved. | 
| (EC-ED) | | 
pe & 238-317 | | Second I/O area. | 
e (EF~13D) | | 
| | | 
|318-319 | Reserved. | 
| (13E- 13F) | | 
io me 


* Numbers in parentheses are displacements in hexadecimal notation. 
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DTFCP (DISK=parameter omitted) 


Tem a ee ne en Re a er 
| Input or output table generated when the parameter DISK= is omitted | 
| from the DTFCP macro (Tape Resident System Type). | 


| Bytes* | Bits | Function 
0-15 CCB. 
(00—-0F) e ss 
16 0-1 | Not used. . 

(10) 2 COBOL open; ignore option. Me 
3 Not used. 
4 DTF table address constants relocated by OPENR. 
5 Not used. 
6 = ASCII (used only if DISK=YES), 0 = EBCDIC 


(used only if DISK=YES). 


| | | | 

| | | | 

| | | | 

| | | | 

| | | | 

| | | | 

| | | | 

| | | | 

| | | | 

| | | | 

| {| 7 | Used by FORTRAN. | 

| | | | 

| 17-19 | | Logic module address. | fo 
{(11-13) | | | 

| | | \ 
| 20 | | DIF type x'31' except in the case of tape assigned | 

| (14) | | to units SYSO00 to SYSnnn. In this case DTFCP open | 

| | | phase changes it to X'10'. | 

| | | 

| 21 | | Open indicators X'02' input, X'00' output (except | 

| (15) | | for tapes assigned to SYS000 to SYSnnn when it is | 

| | | X'00' input, X'08' output). | 

| 22-28 | | Filename. | 

eas | 

{ 29 (1D) | | Device type code: X'45' = 3800 with TRC. | 

| | | | 

| 30 (1E) | | X'00' indicator to DTFCP open phases and logic | ' 

| | | module. | 

| | | 

| 31 | 0 | 1 = input, 0 = output. | 

| (1F) | 1 | 1 = eject needed for a read punch, 0 = no eject. | 

| | 2 | 1= not first pass, 0 = first pass. | 

| | 3. | 1 = two 1/0 areas, 0 = one I/O area. {3 

| | 4 | 1 = 2540 punch. | 

| | 5 | 1 = SYSLST or SYSPCH | 

| | 6 | 1 = SYSLST or SYSPCH on output tape. | 

| | 7 | 1 = TLBL specified and tape is labeled | 

| | | 

{| 32 (20) | | Open indicators. | i - 
| | | a 
| 33-35 | | IOAREA2 address. | \\ 
|(21-23) | | | oe 
| | | | 

| 36-39 | | Instruction to load user's I/O area address into 

{(24-27) | | I/O register. | 

| | | 

| 40-47 | | ccW. | | 

|(28-2F) | | | 

| End of table if DTF is defined as output file and DEVADDR is not | f 
| equal to SYSPCH. | i \ 
pS SSS SSS eee ee t 
[48-55 | | 2540 punch error recovery CCW 1. | 

paar ae | 

{56-63 | | 2540 punch error recovery CCW 2 | 

tae ee | | 

{57-59 | | EOF address, input only. 

|(39-3B) | | | ee 


ee a ae ee Se ee ea! 
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DTFCP (DISK=parameter omitted) (cont...) 


Bese an a et te gt em tere he ae TS Ne ee Ot tay pe ean tel 
| Bytes* | Bits | Function | 
Rt 
| | 
| End of table if DIF is defined as input file. | 


| 64-143 
| (40-8F) 


—— | 144-223 
ad | (90-13F) 


SS 
| For 2560 and 5424/5425 bytes 48 onwards contain the following | 


80—-byte card image, save area 1. 


80-byte card image, save area 2. 


| | 
| | 
| | 
| | 
| | 


information: | 
SS SS Se 

[48-207 | | IOAREA1. | 

| (30-CF) | | | 

get ee, |208-209 | | Reserved. | 
eo eet | 
. |210-369 | | IOAREA2. | 
| (D2-171) | | | 

{370-371 | | Reserved. | 

| (172-173) | | | 

| | | 

[372-451 | | Compare area. | 

| (174-103) | | | 


|S er Ce (Src a SAP ST | 


* Numbers in parentheses are displacements in hexadecimal notation. 
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DTFDI (Device Independent) 


onnesd se ee atte Ms to oe TR Go i — es ee ee eee 
| Bytes*| Bits | Function | 
{| 0-15 | | CCB. If the file is on a Disk, the CCW address in | 
| (00-OF) | | bytes 9-11 (09-OB) is changed by OPEN to point to the| 
| | | DTF extension. CLOSE restores it. If 3800 extended | 
| | | buffering is selected, the CCW address is changed by | 
| | | OPEN to point to a DTF extension work area in the | 
| | | user virtual area. CLOSE restores it. | 
| | | | 
| 16 | 0-1 | Not used. | 
{(10) | 2 | COBOL open; ignore option. | 
| | 3 | Not used. | 
| | 4 | DIF table address constants relocated by OPENR. | 
| | 5-7 | Not used. | 
| | | | 
| 17-19 | | Address of logic module. If the file is on a Disk, | 
} (11-13) | | OPEN changes this address to point to the device | 
| | | independent logic module in the system virtual area. | 
| | | CLOSE restores it. If 3800 extended buffering is | 
| | | selected, OPEN changes the address to point to the | 
| | | extended buffering logic module IJDPR3 in the system | 
| | | virtual area. CLOSE restores it. | 
| | | | 
| 20 | | DIF Type = x'33' | 
{qi4) | | | 
| | | | 
{ 21 | | Open/Close indicators ~ X'82' =input, X'80' =output. | 
| (15) | © | Always set on for no rewind. | 
| | | | 
| 22~28 | | Symbolic filename. | 
| (16-1) | | | 
| | | 
| 29 { | Disk or diskette device indicators | 
{qip) | | X'00' = 2311 | 
| | {| X'O1L' = 2314, 2319 | 
| | | x'o4' = 3330-1,-2 | 
| | | X'05' = 3330-11 | 
| | | x'07' = 3350 | 
| | | X'o8' = 3340 general | 
| | | X'09’ = 3340 35MB | 
| | | X'OA' = 3340 70MB. | 
| | | X'90' = 3310, 3370 | 
| | | | 
| 30-35 | | Disk address of format-1 label. | 
es) | 
| 36-37 | | Disk or diskette volume sequence number. | 
a" | 
| 38 | | Open communications switch. | 
| (26) | O | 1= No more extents — diskettes | 
| | 1-3 | Not used | 
| | 4 | Always 1 | 
| | 5-7 | Not used. | 
| | | | 
| 39 | | Sequence number of current extent. | 
bo | 
| 40 | | Sequence number of last extent, or X'80' for 1442 

| (28) | | reader punch. | 
| | | | 
| 41 | | Open indicator = X'20'. | 
| (29) | | | 
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DTFDI (Device Independent) (cont...) 


ee See ee 1 
|Bytes* | Bits | Function 
F sa | 
|42 (2A) | Device type indicators: 
| 0 | Unused. | 
| 1 | 1 = DTF has been extended into the part. GETVIS area 
— | 2 | 1= Disk 
| 3 | 1 = tape | 
ee | 4 | 1 = printer 
— | 5 | 1 = punch 
| 6 | 1 = reader 
| 7 1 = RPS supported. 
| | 
| 43 Logic module device indicators: | 
| (2B) X'F3' = Disk or diskette device | 
| X'Fl' = reader or tape device 
| X'FO' = other type device 
z [44 (2C) Logic module option switches 
—— | | O | 1 = input; 0 = output. 
| } 1 | 1 = eject for RDR-PCH; 0 = no eject. 
| | 2 | 1 = not first pass; 0 = first pass. 
| | 3 | 1 = two I/O areas; 0 = one I/O area. 
| | 4 | 1 = 2540 Punch. 
| | 5 | 1 = SYSLST/SYSPCH. 
| | 6 | 1 = Tape SYSLST/SYSPCH. 
| i 7 | 1 = ASCII; 0 = EBCDIC code. 
| | | 
| 45-47 | | Alternate I/O area address. | 
| (2D-2F) | | | 
| | | | 
[48 (30)| | Logic flags: 
| | 0-1 | Reserved. 
| 2 | 1 = Version 3 DTF. 
| | 3-4 | Reserved. | 
| | 5 | 1 = TRC=YES specified on DTF | 
| [| 6 | 1 = TRC in effect | 
| | 7 | 1 = 3800 printer | 
| | | | 
| 49-51 | | Reserved. | 
Osea | | 
| 52-53 Extent lower head limit. | 
ee | 
; | 54-57 Extent upper head limit. 
: | PP 
; 3 (36-39) 
_ | | 
ad | 58-64 Disk seek address. 
| (34-40) | Diskette seek address at byte 60 (3C). 
| | | 
| 65-67 | Users EOF address. | 
| (41-43) | | 
| | | | 
| 68-72 | Control bucket CCHHR. 
| (44-48) | Byte 72 (48) always X'01' for diskettes. | 
| 
| 73 Logic module switches 
(49) X'01' = input 
X'00' = output 
| X'00' = both input and output on diskettes. 
| 74-75 Logic module constants | 
(4A~4B) X'0020' Disk output 
X'0018' Disk input 
X'0008' Diskette devices 
~ X'0000' Non—Disk devices | 
. 
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DTFDi (Device Independent) (cont...) 


i = Tr —— 
Bytes* | Bits | Function | 
= —SSert | 
| 76-80 | | Count field CCHHR (OCHRO for diskettes); not used 
| (40-50) | | for FBA Disk. | 
| | | | 
[81 (51) | | Key length. | 
| | | | 
82-83 | | Data length. | 
ce 
84-87 | | Instruction to load IOREG with correct I/O area 
(54-57) | | address. | 
| | 
| 88-103| | Seek, Search CCWs; not used for FBA Disk. 
(58-67) | | Seek, Read/Write CCW for diskette files. | 
| | | 
| 104-111] | TIC ccW. | 
| (68-6F) | | NOP CCW for diskette output files; 
| | unused for diskette input files. | 
| | | 
112-119 | Input/output CCW. | 
| (70-77) | | | 
120-127 | Second output CCW. 
(78-7F) | 
| | | | 
128-151 | Verify CCWs for output. | 
(80-97) | 
| | | 
1152-159 | | Error CCW1. |” 
(98—-9F) | | 
| 
| 160-167 | | Error, CCW2. | 
(A0-A7) | | 
| 
1168-231 | | Save area (64 bytes). | 
(A8-E7) | | 
| 
| 232-235 | | DC ACWLRERR) if WLRERR=Address. | 
| (E8-EB) | | B 28(15) if ERROPT= omitted. | 
B 25(15) if ERROPT=SKIP. | 
| | | B 28(15) if ERROPT=IGNORE. | 
| | 
236-239 DC A(ERROPT) if ERROPT=Address. | 
| (EC-EF) | | B 0(15) if ERROPT= omitted. | 
| B 24(15) if ERROPT=SKIP. | 
| B 28(15) if ERROPT=IGNORE. | 
ee eee (oe “il 


* Numbers in parentheses are displacements in hexadecimal notation. 
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DTFDU (Diskette Unit) 
a, = dt oh ae ae : ah 
| Bytes* | Bits | Contents | Function | 
a 4 — 
| o-15 | | | Command Control Block (CCB) | 
| (O-F) | | | | 
| | | | | 
| 16 =| 0-3 |B‘oOO00O' | Not used. | 
| (10) | 4 | | 1 = DIF relocated by OPENR. | 
| | 5-7 |B'o0o' | Not used. | 
| | | | 
| 17-19 | | | Address of logic module. | 
eee ae | | 
| 20 | }X*aA' | DTF type for OPEN/CLOSE | 
| (14) | (X'1A' = diskette file). | 
| |x'21' | (X'21' = DTFPH) | 
| | | | 
| 21 on) | | 1 = Command chained file. | 
| (15) 1-2 |B'oO' | Not used. | 
| | 3 | | 1 = Work area specified. | 
| 4 [B'O' | Not used. | 
| | 5 | | 1 = Open; 0 = Close. | 
| | 6 | | 1 = Input; 0 = Output. | 
| [| <P | | Not used. | 
| | | | | 
| 22-28 | | | Filename. | 
| (16-1C) | | | | 
| | | | | 
| 29 | |x'06' | Device type code. | 
| (1D) | | | cx'oe' = 3540). | 
| | | | 
{| 30-35 | |C'OOCHROO' | Address of HDR1 label in VTOC | 
| (1E-23) | | | 
| | | | | 
| 36-37 | | Volume sequence number. | 
| (24-25) | | | 
38COCS | | Open communications byte | 
| (26) | Input File: | 
| | oO | | 1 = No more extents | 
| 1-2 |B'00' | Not used | 
| 30° 4 | 1 = Exit for user's EOF routine | 
| | 4 | | 1 = Next extent on new volume | 
| 5-6 | | Not used | 
| | | 1 = Extent switch. | 
| | | | Output File: | 
| | Oo | | 1 = No more extents | 
| a cn | 1 = Extents needed at Close time | 
| | 2-3 |B‘OO' | Not used | 
| 4 | | 1 = Next extent on new volume | 
| |} 5 | | 1 = Extent entered via console 
| 6-7 | | Not used. | 
| | | | | 
| 39 o | | 1 = Extent bypassed before file 
| (27) | | | opened (input). 
| 0-7 | | Sequence number of current extent 
| | | | opened (output). | 
| | | 
| 40 (28)| | | Sequence number of last extent | 
| | | | opened. | 
| 41-43 |x'oo0000' | Reserved. 
| (29-2B)| | | | 
| | | | | 
| 44-47 | | Address of IOAREA1. | 
| (2C-2F) | | | 
| | | | 
| 48-51 | | | Address of last Read/Write CCW 
| (30-33) | | | in chain. | 

a Sea 
Chapter 3. IOCS (General) 
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DTFDU (Diskette Unit) (cont...) 


[— Pee T T 1 

| Bytes* | Bits | Contents | Function | 

+ 4 4 
52-53 x'ooo1' Lower record limit. | 

| | | 

hag a 
54-57 | X' OOCCOORR' End—of—data seek address 

| 

| (36-39) | | | (last record + 1). | 

| | | 

| 58-59 | | Number of records in I/O area | 

| (3A4-3B)] | (used in short chain processing). 

| | | | | 

| 60-63 | |X'OOFFO001' | Seek argument (OCHR). 

| (3C-3F) | | 

| | | | 

| 64-67 | | | End-of—file routine address (input); | 

| (40-43) | | | 4X'00' (output). 

| | | | 

| 68-71 | |X'0049001A' | Seek argument control field. | 

| (44-47) | | | 

| | | | | 

| 72 (48)| | | Command chaining factor. 

| | | 

| 73 (49)} | | Switch byte 1. 

| | oO | 1 = Not first entry after open. 

| 1 B'o' | Not used. | 

| | 2 | | 1 = In close routine (output). 

| 3 | 1 = Error chain to be skipped. 

| | 4 | | 1 = End of extent. 

| 5-7 |B'ooo' | Not used. 

| | | | | 

| 74-75 | (Record size multiplied by command 

| (4A-4B) | | chain factor) - 1 | 

| | 

| 76-80 |X'FFFFFFFFFF' | Seek argument bucket. | 

| (40-50) | | 

| | | 

| 81-83 | {x'000000' Reserved. 

| @54-53) | | 

| | | | | 

| 84-87 | | Instruction to load user's 1/0 

| (54-57) | | | register (or NOP). 

| | | 

| 88-91 | | | Address of current I/O area. 

| (58-5B) | | | | 

| | | | 

| 92-95 | | | Logical record size. 

| (SC-5F)| | | 

| | | | | 

| 96-99 | | |Address of last byte of the I/O area. | 

| (60-63) | | | | 

| | | | | 

| 100 | | | Logical indicators. | 

| (4) | o | | 1: ERROPT=address_ 

| | 1 | | 1: ERROPT=IGNORE | 

| } 2 | | 1: ERROPT=SKIP | 

| | 3 | | Not used | 

| | 4 | | 1 = Two I/O areas | 

| | 5-7 | | Not used. | 

| | | | | 

| 101-103] | | Address of user's error handling | 

| (65-67) | | | routine. | 

| | | | | 

| 104 | | | CCW count (write command only). | 

| (68) | | | | 

eee Sue ae bee _ 
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DTFDU (Diskette Unit) (cont...) 


f T T I 
| Bytes* | Bits | Contents | Function 
jt + 
| 105 | Allowed operations 
| (69) 0 | 1 = Allow read commands | 
| [<2 | 1 = Allow write commands 
| 2 | 1 = Suppress unit check on C4/C6 | 
nee | 3-7 |B‘'00000' | Not used. 
\ | | | 
ser | 106 | x'00' | Sector factor (X'00'=128). | 
| (6A) | | | 
| 107 }X'oo' | Reserved. 
| (6B) | | 
| | | | 
| 108 0 {| 1 = Write protect | 
] (6C) 1 | | 1 = No feed at EOF 
2 | 2 | | 1 = Check multivolume sequence 
co \ | 3 | 1 = Multivolume file | 
F ais | | 4 | 1 = Verify requested | 
S | | 5 | | 1 = C6s written (update ERMAP) 
| 6 | | 1 = Read/Write security 
| 7 B‘o' | Not used. 
| | | 
| 109-111 x'000000' | Not used. | 
| (6D-6F)| | 
i | 
112-119 | | Feed CCW. 
(70-77) | 
| 
| 120-127 | Define ops CCW (output); 
| (78-7F) | | 8X'00' (input). 
| 
128-135 | | | Seek CCW. 
(80-87) | | 
| 
136-143 | | TIC CCW. 
(88~-8F } | | 
| | 
| 144-X X=143+8* | Read/Write data CCWs; 
(no. of CCWs) | 1, 2, 13, or 26 
| 
| (90-Y) | Y=8F+8* | Read/Write CCWs. 
(no. of CCWs) | 
| | 
X+1 | NOP CCW (output only). | 
ee so ae | 


* Numbers in parentheses are displacements in hexadecimal notation. 
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DTFPH (Sequential Disk) 


are er eae 
| Bytes |Bits| Function 


20 ¢ 


21 ¢ 


(11-13) 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
(1F-23) | 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


CCB. 


1 = Dequeue old volume extents. 
Not used. 

1 = File assigned 'IGN' (COBOL). 
Not used. 

1 = DIF relocated by OPENR. 

Not used. 


FwONr OO 


3x'00' 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


14)| DIF type (X'21'). 


15) Open/Close indicators. 

1 = Blocked files. 

Work file 

Work area 

Not Version 1 table type. 
open; 0 = closed. 

input; 0 = output. 

User labels specified. 


ra 


SAME WH 


Hot doa heal 


ee 


Filename (see byte 29). 


| 
| 
| 
| 
| 
| 
| 
=e 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| Device type code: 

| x'oo' 2311 x'og9' 
| x'ou' 2314, 2319 Xx'oa' 
| x'o4' = 3330-1, -2 X'0OB' 
| x'o5' = 3330-11 x'oc' 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


x'07' 3350 x'90' 
X'08' = 3340 general 


hou nt th Wu 


C'F' = EOF indicator for DTFPH. 


(BCCHHR) Address of Fl label in VTOC 
(BCCHHR) Address of next DLBL EXTENT 


Volume sequence number. 


Open communications byte. 

OUTPUT 

No more EXTENTS. 

EXTENTS for LIOCS at close. 
Process trailer labels. 

Process header labels. 

Next EXTENT on new volume. 
EXTENTS entered via console. 
Process trailer labels at close. 


NODUPWNHEO 
[Te 


HR RR Re eR et 


rat 
rg 


UT 
1 = No more EXTENTS. 
Not used. 


Not used. ; 

1 = New volume on next EXTENT. 
Not used. 

1 = Process header labels. 

Not used. 


NADU PWN EHO 
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3340 70MB 
3375 

3380 

FBA device 


(output). 


record (input). 


Check EXTENT for minimum of 2 tracks. 


1 = No Fi label, process EXTENTS only. 
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DTFPH (Sequential Disk) (cont...) 


eer T 
| Bytes |Bit 


39 (27) 


40 
(28) 


41-43 
(29-2B) 


44 (2C) 


45-47 
(2D—2F) 


48-51 
(30-33) 


52-53 
(34-35) 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


—— 
s | 


Function 


© Copyright IBM Corp. 1985 


Sequence number of current EXTENT being opened. 


Sequence number of last EXTENT opened (not a console 


EXTENT entry). 


Address of user's label routine. 


1 = Version 3 DTF. 


Not used. 


CCHH address of user's label track. 


x'80000000'. 


Lower head limit (HH) X'0000' if type 1; X'0Onn' if 


type 128 (n = head 


limit). 


EXTENT upper limit (CCHH). 


BB seek address: BB = X'0000' 


(CCHH). 


input, 
output. 


Initially 


if disk device. 


if 2311 — type 1 
if 2314 or 2319 — type 1 


if 3330 type 1 

if 3330-11 — type 1 
if 3340 35MB 

if 3340 70MB 

if 3350 — type l 


if 3375 


EXTENT lower limit 
Record number. 1 = 
0= 
Not used. 
CCHH control bucket. 
CCHH = X'00C80009' 
CCHH = X'00C80013' 
CCHH = X'01940012' 
CCHH = X'03280012' 
CCHH = X'015C0009' 
CCHH = X'02B8000B' 
CCHH = X'022B001D' 
CCHH = X'03B2000B' 
CCHH = X'0375000E' 


if 3380 


PBN = Maximum block size if FBA device 


Note: 


The last two digits of CCHH are replaced by the 
current head number when the type 128 version 


of the device is specified. 


Record number. 


Not used. 


Not used. 


CCHHR bucket = extent lower limit and record number. 


Not used. 


a a AE ee es re ne PS Sn Rea OCD RE PO a a OPO ND a PD PPT ON OEE eR Ee OEY ee RR ERIN 


a a 


Numbers in parantheses are displacements in hexadecimal notation. 


Chapter 3. 


Iocs 


(General) 
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fe an er tT as | 
| Bytes* | Bits | Function | 
L i 4 
| O-15 | | CCB. | 
}(O-F) | | | 
| | | | 
| 16 { 0 | 1 = Dequeue old volume extents | 
{| (10) |{ 1-3 | Not used | 
| | 4 | 1 = DTF relocated by OPENR | 
| | 5-7 | Not used. | 
| 
{17-19 | | 3x'oo' | 
(11-13) | | | 
| | | | 
2° (14) | | DIF type (X'21'). | 
{ 21 | | Open/close indicators | 
| | 0-2 | Not used | 
{ | 3 | 1 = Work area | 
{ | 4 | 1 = Not Version 1 DIF table type | 
{ | 5 {| 1 = Open; 0 = Closed | 
| | 6 | 1 = Input; 0 = Output | 
| | 7 | Not used. | 
| | 
| 22-28 | | Filename (see byte 29). | 
| 
= (1D) | | Device type code (3540 = X'06'). | 
| 
a (1E) | | C'F' = EOF indicator for DTFPH. 
| 
|30-35 | | (OCHROO) Address of HDR1 label in VTOC (output). | 
eee | 
| 36-37 | | Volume sequence number. | 
| (24-25) | | | 
| | | | 
| 38 | | Open communications byte. | 
| (26) | | Input: | 
| { O | 1 = No more extents | 
| | 1-3 | Not used | 
| | 4 | 1 = New volume or new extent | 
| | 5-7 | Not used. | 
| | | Output: | 
| | oO | 1 = No more extents | 
| ae | 1 = Extents for LIOCS at close | 
| | 2-3 | Not used | 
| | 4 | 1 = New volume on next extent | 
| | 5 | 1 = Extents entered via console | 
| | 6 | Not used 
| \. 27 | 1 = Check extent for minimum of 2 tracks. | 
| | | 
{| 39 | | Sequence number of current extent being opened. 
| (27) | | 
| | | 
| 40 | Sequence number of last extent opened (not a | 
| (28) | console extent entry). 
| | | 
(41-43 | Not used. 
oe | | 
[44-47 | Address of IOAREA1. 
eee 
| 
|48-51 Not used. 
| (30-33) | 
| 
|52-53 X'0000' 
| (34-35) | 
Ma ee 
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ia j DTFPH (Diskette) (cont...) 


(Ages we dig a, Syl a a aa? a ON ae a PD eR ee ee ye 


| Bytes* | Bits | Function | 
[54-57 | | Extent upper limit (OCHR). | 
fein || 
[58-59 | | Not used. | 
» ee 
_ {60-63 | | Extent lower limit (OCHR). | 
ad 
| 64 | | Record number. 1 = Input, 0 = Output. | 
Ca 
| 65-67 | Not used. | 
| (41-43) | | 
a | | | | 
“ \ {68-71 | | OCHR control bucket. | 
a j | (44-47) | OCHR = X'0049001A' for 3540 (output only). | 
cd | | | 
| 72 | Record number. | 
Ca 
| 73 | X'80' — verify requested. | 
| (49) X'40' — last volume on multivolume file (input). | 
| X'10' ~— multivolume file (input). | 
| | 
| 74 | | Record size (maximum of 128). | 
| (4A) | ! 
| 75 Not used. | 
aa 
| 76~80 | OCHR bucket = extent lower limit and record number 
| (40-50) (output). | 
| | 
181-83 | Not used. | 
| (51-53) | 
ts 1 7 I 


* Numbers in parentheses are displacements in hexadecimal notation. 
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DTFDA (Direct Access) 


{DTF Assembly| Module | | | 


| Label |DSECT Label|Bytes |Bits| 
|&Filename  |IJICCB | 0-15 | | 
| | as 
| | IJIMOD | 146 |o | 
| | { (10) | 1 | 
| | | {2 | 
| | | eae 
| | | | | 
| | | | 4 | 
| | | ba 7 
| | | | 6 | 
| | | {7 | 
| | | | 
| | \t7—-19. | | 
| | | (11-13) | | 
| | | | | 
| | | 20 | | 
ee ee ae 
| | IJISWI { 21 | o | 
| | { (15) | 1 | 
| | | te 4 
| | | | | 
| | | sa 
| | | | | 
| | | 4 | 
| | | [if 
| | | | | 
| | | [26> G 
| | | |? | 
| | | | 
| | IJIFNM }22-28 | | 
| | nF 
| | IJIDVTP | 29 | | 
| | | (1D) | | 
| | | | | 
| | | | | 
| | | | | 
| | | | | 
| | | | | 
| | | | | 
| | | | | 
| | | | | 
| | | | | 
| | | | | 
| | LJIUNT {30-31 | | 
| | | (1E-1F) | | 
| | | | | 
| | | | | 
| | | | | 
| | | | | 
| | | | | 
| | IJIRPS | 32 [|o | 
| | {(20) | 1 | 
| | | | | 
| | | [2-6 | 
| | | i oar 
| | | | | 
| | LJIULB {33-35 | | 
Pe ee 
| | IJIUXT |36-39 | | 
| | | (24-27) | | 


Function 


Command Control Block (CCB). 


1 = Trailer labels 

Used by FREE macro 

1 = COBOL Open/Ignore option 

1 = Track hold option 
specified 

1 = DTF relocated by OPENR 

Not used 

1 = SPNUNB 

Used by CNTRL macro 


Address of logic module. 


DIF type for OPEN/CLOSE 
(X'22' = direct access files). 


1 
1 


Output; O = Input. 
Verify option specified. 


1 Search multiple track 
(SRCHM) specified. 

1 = WRITE AFTER or WRITE RZERO 
macro used. 

1 = IDLOC specified. 

1 = Undefined; 0 = FIXUNB, 
VARUNB, or SPNUNB 

1 = RELTYPE = DEC 

1 = End of file. 


Filename (DTF Name). 


Device Type. 


X'00' = 2311 

X'O1' = 2314, 2319 
X'04' = 3330-1, 3330-2 
X'05' = 3330-11 

X'07' = 3350 

X'08' = 3340 general 
X'09' = 3340 35MB 
X'OA' = 3340 70MB 
X'OB' = 3375 

X'oc' = 3380 


Starting logical unit address 
of the first volume contai-— 
ning the data file. 

This value is supplied by the 
OPEN from EXTENT cards (can 
be initially zero). 


Not used 

1 = RPS device and RPS=YES in 
FOPT macro 

Not used 

1 = Extended DTF for RPS 


Address of user's label 
routine. 


Address of user's routine for 
processing EXTENT information. 
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eee 
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DTFDA (Direct Access) (cont...) 


[DIF Assembly| Module | | | 


| Label 


&Filename.Z 


|DSECT Label] Bytes [Bits| 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
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Function | 


Pointer to relative address 
area: 
&Filename.P — &Filename 

2 


Address of a 2—byte field in 
which IOCS can store the error 
condition or status codes. 


Macro code switch for 
internal use: 


x'0000' = READ ID 
X'0001' = READ KEY 
X'0002' = WRITE ID 
X'0003' = WRITE KEY 
X'0004' = WRITE RZERO 
X'0005' = WRITE AFTER 


Pointer to channel program 
build area (&Filename.B) 
minus 32. 


Control seek CCB. 


Control Seek CCW for overlap 
seek routine. 


Channel program builder 
instruction: XI 36(2),C'0' 


Maximum data length for FIXUNB 
or UNDEF records;BLKSIZE for 
VARUNB or SPNUNB records. 


Pointer to READ ID string 
(Filename.0); X'00' if no 
READ ID issued. 


Pointer to READ KEY string 
(Filename.1); X'00' if no 
READ KEY issued. 


Pointer to WRITE ID string 
(Filename.2)}; X'0O' if no 
WRITE ID issued. 


Pointer to WRITE KEY string 
(Filename.3); X'00' if no 
WRITE KEY issued. 


Pointer to WRITE RZERO string 
(Filename.4); X'00' if no 
WRITE RZERO issued. 

Pointer to WRITE AFTER string 
(Filename.5); X'00' if no 
WRITE AFTER issued. 


Reserved 
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DTFDA (Direct Access) (cont...) 


ht ae =, Se ee ae eo alg re ee ed 
{DTF Assembly! Module | | | | 


number of the device on which 
the label track is located. 


{ Label |DSECT Label| Bytes |Bits| Function | 
| | IJILAT | 88 { O | Not used. | 
| | | ¢58) | 1 | 1 = Wrong-length record. | 
| | | {| 2 | 1 = Non-data transfer error. | 
| t | | 3. | Not used. | 
| | | | 4 | 1 = No room found. | 
| | | {5-6 | Not used. | 
| | | | 7 | 1 = Record out of extent area. | 

| | | 
| | | 89 |0O | 1 = Data check in count area. | 
| | | (59) | 1 | 1 = Track overrun. | 
| | | | 2 | 1 = End of cylinder. | 
| | | | 3 | 1 = Data check when reading | 
| | | | | key or data. | 
| | | | 4 | 1 = No record found. | 
| | | | 5 | 1 = End of file. | 
| | | | 6 | 1 = End of volume. | 
| | | | 7 | Not used. | 
| | | | | | 
| | IJILBTK |90-95 | | Label track address, XBCCHH, | 
| | | (SA-SF) | | where X is the volume sequence] 
| | | | | | 
| | | | | | 


| The following section is included if UNDEF, AFTER, or RZERO is 
| specified. 


| 

| 
{&Filename.L |IJILST 196-143 | | Basic CCWs to build channel | 
| | (60—-8F) | | program. 
| | | | | | 
| | {144-183 | Basic CCWs for undefined | 
| | | (90—B7) | | length or formatting macros. | 
| | | | | | 
| | IJIVIT | 184-185 | | Instruction to give record | 
| | | (B8-B9) | | length to user if record | 
| | | | | length is undefined. | 
| | | | | (NOPR 0 if no RECSIZE | 
| | | | | specified.) | 
| | | | | | 
| | ISIFRU | 186-187 | | Instruction to get record | 
| | | (BA-BB) | | length from user if record 
| | | | | record length is undefined. | 
| | | | | (NOPR 0 if no RECSIZE | 
| | | specified.) | 
| | | | 
|&Filename.F | IJIFLD | 188-192 | Work area (used for RO | 
| | (BC-CO) | address — CCHHO). | 
| | | 
|&Filename.K |IJICNT 193-200 | Work area (used for RO data | 
| | | (C1-C8) | field). | 
| | | 
|&Filename.C |IJICTS 201-208 | Work area (included only for | 
| | (C9-DO) | spanned or variable records | 
| | | for record count field). | 

ee eevee oe 

| The channel program builder strings are generated following the | 
| DIFDA table, and preceding the channel program building area. | 
= ree ar al na i 3 
|&Filename.0O | |Variable| | Channel program builder string] 
| | | | | for READ ID macro. 
| | | | | If READ ID is not specified, | 
| | | | | the string is not generated. | 
eee ! anaes te sean! UE NER ait ee eee eee Seer an) 
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DTFDA (Direct Access) (cont...) 
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T 
DTF Assembly] Module | 
| Label DSECT Label | 


Bytes 


= 
&Filename.1 


&Filename.2 | 


&Filename.3 


&Filename.4 


&Filename.5 


| varies in size. 


&Filename.B 


cin co et ee enn 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


Variable 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


j i 


| The following section contains the channel program build areas and 


+ 


Function | 


Channel program builder string 
for READ KEY macro. 

If READ KEY is not specified, 
the string is not generated. 


Channel program builder string 
for WRITE ID macro. If WRITE 
ID is not specified, the 
string is not generated. | 


Channel program builder string 
for WRITE KEY macro. If WRITE 
KEY is not specifid, the 
string is not generated. 


Channel program builder string 
for WRITE RZERO macro. If 
WRITE RZERO or WRITE AFTER is 
not specified, the string is 
not generated. 


Channel program builder string 
for WRITE AFTER macro. If | 
WRITE RZERO or WRITE AFTER is | 
not specified, the string is | 
not generated. 


Seek CCW that is generated 
at program assembly time and 
used by all channel programs. 


Area to build: 


1. Eight CCWs if AFTER is 
not specified. 


2. Eight CCWs if spanned or 
variable length records 
and AFTER=YES is specified 


3. Seven CCWs if undefined 
or fixed records and 
AFTER=YES is specified. | 


Area to build: 


1. Eight CCWs if AFTER is not 
specified and VERIFY=YES 
is specified. 


2. Eight CCWs if spanned or 
variable length records 
and AFTER=YES and 
VERIFY=YES are specified. 

| 

3. Five CCWs if undefined or | 
fixed records and 
AFTER=YES and VERIFY=YES 


are specified. 
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DTFDA (Direct Access) (cont...) 


foe me ete alo eae ee ee ee ee es ee Gee nl 
|DTF Assembly| Module | | | | 


| Label |DSECT Label| Bytes |Bits| Function | 
1 _____-__1-______§|__—__ 


| The following section is added for spanned records only. | 


cea aa ETO) RET (| Pac a eee TES | 


| | | 8 bytes| | Count save area. | 
| | | | | | 
| | | 8 bytes| | SEEKADR save area. | 
| | | | | | 
| | | 1 byte | 0 | 1 = Relative addressing. | 
| | | 1 | 1 = IJIGET switch on. | 
| | | | 2 | 1 = Ignore hold switch on. | 
| | | | 3. | Reserved for use by IJGXDAV/S| 
| | | | 4 | 1 = New volume SEEKADR. | 
| | | |5-7 | Not used. | 
| | | | | | 
| | | 1 byte | | Reserved. 

| | | | | | 
| | | 2 bytes| | Record size. | 
| | | | | 
| | 12 bytes | | Work area. 

| | | | | | 
| | 8 bytes] | Control word save area. 


| The following section is added to the DIFDA table if DSKXTNT | 
| (relative addressing) is specified. | 


SEEKADR (see bytes 112-119): 
2311: x‘00000001' 

2314, 2319: x'ooo000001' 
3330: xX'00000001' 

3340: xX'00000001' 

3350: x'o0000001' 

3375: x'00000001' 

3380: xX'00000001' 


|&Filename.P | |3 bytes | | 3X'00' for padding. | 
| | | | 
|&Filename.I | |5 bytes | | IDLOC record area (bucket 

| | | | | used by module). | 
| | | | | | 
|&Filename.s | |8 bytes | | SEEKADR in form: | 
| | | | M,B1,B2,C1,C2,H1,H2,R | 
| | |4 bytes| | DC A(&SEEKADR) | 
| | [4 bytes| | DC A(&IDLOC) 

| |8 bytes| | Work area for RELTYPE=DEC. | 
| | | | | 
|&Filename.X |4 bytes | | Save area for CCHH portion of | 
| | | | | actual disk address. 

| | | | | | 
| |4 bytes | | Alteration factor for Cl in | 
| | | | SEEKADR (see bytes 112-119): | 
| | | | | 2311: X‘'oo0000001' | 
| | | | | 2314, 2319: x'o0000001' | 
| | | | | 3330: X'00001300' | 
| | | | 3340, 3375: xX'0o0000C00' 

| | | | 3350: X'00001E00' | 
| | | | 3380: X'OOOOOFOO' | 
| | | | | | 
| | 4 bytes | | Alteration factor for C2 in | 
| | | | SEEKADR (see bytes 112-119): | 
| | | | 2311: X'ooo00000A' | 
| | | | 2314, 2319: x‘'00000014' | 
| | | | 3330: X'00000013' | 
| | | | 3340, 3375: x'0000000C' 

| | { | 3350: X'OOOOO01E' | 
| | | | 3380: X'OOOOOOOF’ | 
| | | | | 
| | | | Alteration factor for Hl in | 
| | | | | 
| | | | | 
| | | | | 
| | | | | 
| | | | | 
| | | | | 
| | | | | 
| | | | | 


| 
| 
| 
| 
| 
| 
| 
|4 bytes 
| 
| 
| 
| 
| 
| 
| 
| 
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DTFDA (Direct Access) (cont...) 


|DTF Assembly| 


| Label |DSECT Label| Bytes 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


| Variable 
|to end 
jof DTF 
|table 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
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Function | 


DSKXTNT table composed of a 
variable number of 8—byte 
entries containing extent 
information in the following 
format: 


Bytes 0-2 

TTT2 — cumulative number of 
tracks in the DSKXTNT 
table entries up to 
and including the 
current entry. 

3 M — vol. sequence number. 

4 B — 0 for disk devices. 


Bytes 5-7 

TIT1 -— relative track number 
of lower limit of 
this entry. 


A l-byte end-of-table indi- 
cator containing X'FF' 
follows the last entry in 
the DSKXTNT table. 


Numbers in parentheses are displacements in hexadecimal notation. 
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Device Independent DTF Extension for DTFDA 


foe —T ToT 1 
|DTF Assembly|Module | | | 
| Label |DSECT Label|Bytes |[Bits| Function 

| | IJIXBLD oO | | CCW build area. | 
| | | (0) | | 

| | | | | 

| | IJIXSPTR 176 | | Address of original channel 

| | | (BO) | | program. 

| | LJIXSVMP 180 | | Address of original logic | 
| | | (B4) | | module. 

| | | | 

| | ISISAVA | 184 | | 72-byte register save area. 

| | | (B8) | | 
| | 266 | Not used. 

ee ce 

| | ISISECVO 267 | Sector work byte. 

Le ee ee | 
| | IJISECV1 268 | Sector work byte. 

| | | (10C) | | 
| | IJISECV2 269 | Sector work byte. 

| | | (10D) | | 
| | IJIXSEC 270 | RPS CCW. 

| | (10E) | | | 
| | IJIXSso 278 RPS CCW. 

| | | (116) | 
| | ISIXSSX | 286 | RPS CCW. 

| | (11E) 

| | IJIXSSNF 294 RPS CCW. 

Eee HO 

| | IJIXSTRG 302 | PESC byte string area. 
i 

| | IJIXSPT 382 | Displacement to strings. 

| | (17E) | | 

| | | | 

| | IJTXMCYL 390 Maximum cylinders per volume. 

| | | (186) 

| | | | 

| | IJIXTFAC | 392 | Tolerance factor. 
Ree ee 

| | IJIFLG1 | 394 | Flag byte. 
Lee | 

| |IJIXUSTF | 395 | Indicator needed to use 

| | | (18B) | tolerance factor 

| | | 

| | ISIFLG2 396 | Flag byte 

| | (18C) | 

i eeeeet ae eee a 


Numbers in parentheses are displacements in hexadecimal notation. 
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[ T na Tym “dy 
Bytes | Bits Function 
- ; 
0-15 | CCB. | 
(0-F) | 
| | 
16 (10) | X'08' indicates DTF relocated by OPENR. 
| 17-19 | 3x'00' | 
(11-13) | | 
20 (14) | DIF type (X'23'). ! 
| 21 (15) | Option codes. 
| 0 1 = Output, O = Input. 
| 1+7 Not Used. 
| 
22-28 | Filename. | 
(16-1C) | 
| | 
| 29 (1D) | Device type code: 
X 00° = 2311 
| X'O1' = 2314, 2319 
| | X'04' = 3330-1, 3330-2 
| X'05' = 3330-11 
| X'07' = 3350 
| X'08' = 3340 general 
| | X'09' = 3340 35MB 
| X'OA' = 3340 70MB 
X'OB' = 3375. 
| | X0C" = 3380. | 
| | 
30-31 | Logical unit address of first volume containing 
| GE-1F) | the file. 
| 
32 (20) | 0 Not Used. 
| 1 1 = Device supports RPS. 
| 2 1 = Version 3 DTF. 
| 3-7 | Reserved for future use. 
| | 
33-35 | Address of user label routine. 
| (21-23) | 
| 36-39 | Address of user routine to process EXTENT 
(24-27) | information. 
ml 
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Chapter 3. I0CS 


(General) 


3-77 


Licensed Material - Property of IBM © Copyright IBM Corp. 1985 
DTFIS LOAD 


uae Mews 6) 
| DTF Module 


T 

| | | 

| Assembly | DSECT | | 
| Label | Label | Bytes {Bits 
Seca Suita Gedo ae 

&Filename | IJHKCCB O-15 | 

(O-F) | 


rr (ia a 


Function 


Command Control Block (CCB). 


Not used. 
1 = COBOL open ignore option. 
Not used. 
1 = DIF table address constants 
relocated by OPENR. 
5 Not used. 
| 6 1 = Data set security. 
7 1 = Wrong block size error 
| | during file extension. 


16 (10) |0-1 
| 


oN 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


17-19 Address of logic module. 
(11-13) 


20 (14) File type for OPEN/CLOSE 


| (X'24' = LOAD). 


IJHKOPCO 


Not used. 
Not used. 
1 = Cylinder overflow option. 
Not used. 


FwWNrF O 


| 
| 
| 
| 
| 
21 (15) | Option byte. 
| 
| 
| 
| 
| 1 = Blocked records (used by 
| previous versions). 
1 = Verify. 
Not used. 
1 = Two I/O areas present. 


SON 


(16-1C) | 


IJHKPDDV| 29 (1D) Prime data device type 
indicator. 

x'00' 
X'o1' 
x'04' 
x'08' 
x'o9' 
x'oa' 


2311 
2314/2319 
3330 

3340 general 
3340 35MB 
3340 70MB. 


&Filename.C|IJHKCCOD| 30 (1E) Status byte. 

1 = Uncorrectable DASD error 
(except WLR error). 

WLR error. 

Prime data area full. 
Cylinder index area not 
large enough to reference 
prime data area. Set on 
only if error detected at 
SETFL time. 

1 = Master index not large 
enough to reference prime 
data area. Set on only if 
if error detected at SETFL 
time. 

Duplicate record. 
Sequence error. 

No EOF record written in 


prime data area. 


1 
1 
1 


i) 


nou i 


a 


NAW 


on it 


| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | 22-28 | File name. | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
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DTFIS LOAD (cont...) 


| DTF | Module | | | | 
| Assembly | DSECT | | | | 
| Label | Label | Bytes [Bits| Function | 
| jaa 31 (IF) | | High level index device type | 
indicator. 
| | | | | x'oo' = 2311 | 
| | | | | X'01' = 2314/2319 | 
| | | | | x'04' = 3330 | 
| | | | | X'08' = 3340 general | 
| | | | X'09' = 3340 35MB | 
| | | | | X'OA' = 3340 70MB. 
| | | | | | 
| | | 32 (20) | | Relative position of the DSKXTN | 
| | | | | logical unit, cell number) table| 
| | | | (in words). This value is the | 
| | | | | length of the DIF table divided | 
| | | | | by 4. | 
| | | | | | 
| | | 33-34 | | First prime data track in 
| | | (21-22) | | cylinder (HH). | 
| | | 35 (23) | | First prime data record in | 
| | | | | cylinder (R). | 
| | | 36-37. | | Last prime data track in | 
| | | (24-25) | | cylinder (HH). ! 
| | | 38 (26) | | High record on master index/ | 
| | | | | cylinder index track (R). 
| | | | | | 
| | IJHKNRPD| 39 (27) | | High record on prime data | 
| | | | | track (R). | 
| | | 40 (28) | | High record on overflow | 
| | | | | track (R). | 
| | | | | | 
| | ITHKNRSH| 41 (29) | | High record on last track | 
| | | | | index track in cylinder | 
| | | | | (whether shared or unshared). | 
| | | | | | 
| | IJHKNRTI| 42 (2A) | | High record on track index track| 
| | | | other than last in cylinder. | 
| | | | | If only one track index track | 
| | | | track in cylinder, it is equal | 
| | | | | to Byte 41. | 
| | IJHKFLAG| 43 (2B) | | Condition Code. | 
| | | | 0 | 1 = WLR checks requested | 
| | | | | (for extension). | 
| | | | 1 | 1 = First record in file. | 
| | | _| 2 | 1 = Prime data extent full. | 
| | | | 3 | 1 = Master index/cylinder index | 
| | | | | extent too small. | 
| | | | 4 | 1 = Prime data upper limit has | 
| | | | | been increased | 
| | | | | (for extension). | 
| | | | 5 | 1 = Extension. | 
| | | |6-7 | Not used. | 
| | | | | | 
| | | 44-50 | | Prime data lower limit 
| | | (20-32) | | (MBBCCHH). | 
| | | | | | 
| | | 51-57. | | Cylinder index lower limit | 
| | | (33-39) | | (MBBCCHH) . | 
| | | | | | 
| | | 58-64 | | Master index lower limit | 
| | | (34-40) | | (MBBCCHH). | 
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DTFIS LOAD (cont...) e 
Sees eae 1 
| DIF | Module | 
| Assembly | DSECT | | 
| Label | Label | Bytes |Bits Function | 
a a eae 
| | | 65 (41) Switches. 
| | | 0-3 | Not used. 
| | | | 4 1 = RPS type device (data). 
| | | 5 1 = RPS type DTF. 
| | 6 1 = Master index. : 
| | | | 7 1 = RPS type device (index). 
| | | | 
|&Filename.H|IJHKLPDR| 66~73 Address of last prime data | 
| | (42-49) record (MBBCCHHR). 
| | | | 
| | ISHKLGLN| 74~—75 | Logical record length. 
| | (4A-4B) : 
| | e 
| | | 76-77. | Key length. | 7 
| | | (4C-4D) | \ 
| | IJHKBKLN| 78-79 | Block length (logical record | 
| | | (4E-4F) | length times number of records). | 
| | | 
| | 80-81 Overflow record length (logical | 
| | | (50-51) | record length +10). | 
| | | 
| | IJHKNRCD| 82-83 Blocking factor (number of | 
| | (52-53) logical records). | 
| | | | 
| | | 84-85 | Index entry length 
| | (54-55) (key length +10). | 
| | | 
| | | 86-87 Prime data record length 
| | (56-57) (key length + physical record | 
| | | | length). | 
| | 88-89 Overflow record length with key | 
| (58-59) (key length + logical record 
| | | | length + 10). | 
| | | | 
| | 90-91 Prime data record format length 
| | | (5A-5B) | (key length + physical record 
| | | length + 8). 
| a 
| | | 92-93 | Overflow record format length | & 
| | | (5C-5D) (key length + logical record \ 
| | | | length + 18). a 
| | | | | 
| | | 94-95 Key location (in blocked 
| | | (5E-5F) | records). 
Ke t ‘eee 


| This is the end of the common DIF area. The format of the remainder 
| of the table is variable and is generated according to the para— 
| meters specified in the DTFIS macro instruction. 


|&Filename.S|IJHKSBKT 
| | 

| | 
|&Filename.P|IJHKLGCT 
| 

| | 

| | 

| | 

| | 

| | 

| | 


96-103 
| (60-67) 


104~105 
(68-69) 


| 106-107 
(6A-6B) 
| 


108-111 
(6C-6F) 


eye a 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


Seek/Search address area 
(MBBCCHHR). 


Logical record counter (for 
blocking). 


Number of bytes for high level 
index. 


Prime data record counter 
(logical records). 


SSS Cee eee SS ae ee ce eee 
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| DTF | Module | | | | 
| Assembly | DSECT | | | | 
| Label | Label | Bytes {Bits| Function | 
ee — 
| | | 112 | | Status indicators. | 
| | | (70) |O-1 | Not used. | 
| | | {| 2 | 1= File closed. 
| | | 13-5 | Not used. : 
| | | | 6 | 1 = Last prime data track full. | 
| | | | 7 | 1 = Last block full. | 
| | 
| | IJHKLTIR| 113-117 | | Last track index normal entry | 
| | | (71-75) | | address (CCHHR). 
| | | | 
| | IJHKLCIR| 118-122 | | Last cylinder index entry 
| | |(76-7A) | | address (CCHHR). | 
| | | | 
| |IJHKLMIR| 123-127 | | Last master index entry address | 
| | | (7B-7F) | | (CCHHR). ; 
| | | | | 
|&Filename.B| | | CCW build area. See description| 
| | | | | of SETFL macro, phasel—$$BSETFL. 
| | | | | | 
| | | 128-135 | Seek CCW. 
| | ee | | | 
| | 136-143 | | Search ID equal CCW. | 
ea 
| | 144-151 | | TIC ccw. 
aan 
| IJHKRDWR | 152-159 | | Read/Write CCW. | 
| jase | | 

| 160-167 | | Search ID equal CCW. | 
| | (AO-A7) | | 
| | | | | | 

| | 168-175 | | TIC cCcw. 
| | renee | | 
| 176-183 | | Verify CCW.., 

| |(BO-B7) | | 
| | | | | 
|&Filename.M| IJHKADCN 184-187 | | Address of IOAREAL. 

| |(B8-BB) | | | 
| | | | | 
| | 188-191 | | Address of data in WORKL. | 
| | (BC-BF) | | FIXBLK = address of WORKL; | 
| | | | | FIXUNB = address of WORKL + key) 

| 

| | 192-195 | | Address of key in WORKL. 
| | (CO-C3) | (FIXBLK = address of WORKL + 
| | | | KEYLOC - 1; FIXUNB = address of | 
| | | | WORKL.) | 
| | 
IJHKBPOS| 196-199 | Block position indicator (addr. 
| (C4-C7) | | of logical record in IOAREAL). 
| | 
| IJHKMIXT| 200 | Master index, extension 
| | | (C8) | indicator. 
| | 0-2 | Not used. i 
| | | 3 | 1 = Extending file, 
| | 0 = Creating file. | 
| 14-6 | Not used. 
| i 7 | 1 = Master index being used, | 
| | | 0 = No master index being used. | 
{- rs | ai eee } 
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DTFIS LOAD (cont...) 


| DTF | Module |. | | | 
| Assembly | DSECT | | | | 
abe abe ytes Bits Function 

| Label | Label | B | | i | 
| | | 201-204 | | Cylinder index upper limit | 
| | haa | | (CCHH) . | 
| | | 205-208 | | Master index upper limit (CCHH). | 
| VeceiGeemn | 
| | IJHKPDUL| 209-215 | | Prime data upper limit (old | 
| | |(D1-D7)_ | | upper limit, if extension) | 
| | | | | (MBBCCHH) . | 
| | | | | | 
| | | 216-222 | | Prime data new upper limit | 
| | | (D8-DE) | | (for extension) (MBBCCHH). | 
| | | | | 
| | IJHKLTM1| 223 | | Last prime data track in | 
| | | (DF) | | cylinder ~ 1. | 
| | | | | 
| | IJHKKLM1] 224-225 | | Key length — 1. | 
| | |(EO-E1) | | | 
| | | | | 
| | ISHKLLM1| 226-227 | | Logical record length ~ 1. | 
| os | | 
| | IJHKTIDR| 228-229 | | Address of track index dummy | 
| | | (E4-E5) | | record (HR). | 
| | | | | 
| | IJHKBFDR| 230~231 | | Address of record before first | 
| | | (E6-E7) | | prime data record in cylinder | 
| | | | | CHR). | 
| | | | | | 
| ISHKNRCM| 232 | | Number of records on master 

| | | (E8) | | index/cylinder index track — 1. | 
| | | | | | 
| | IJHKCMCT| 233-236 | | Master index/cylinder index | 
| | |(E9-EC) | | disk address control field 

| | | | | ae X'00C70009' | 
| | | | | 2314/2319 = x'00C70013' | 
| | | | | 3330 = X'O1FF0O012' | 
| | | | | 3340 = X'O1FFoooC' | 
| | | | | | 
| | IJHKPDCT| 237-239 | Prime data address control | 
| | | (ED-EF) | | field (CCH). | 
| | | | 2311 = X'00C700' | 
| | | | 2314/2319 = X'00C700' | 
| | | | 3330 = X'01FFOO' | 
| | | | | 3340 = X'O1FFOO' | 
| | | | | 
| | IJHKPDBG| 240-242 | Prime data beginning of volume | 
| | (FO-F2) | | (CCH). ; | 

2311 = X 000100 

| | | | 2314/2319 = x'000100' | 
| | | | | 3330 = X'000100' | 
| | | | | 3340 = X'000100' | 
| | | | | 
| | IJHKPDEN| 243-245 | | Prime data end of volume (CCH). | 
| | (F3-F5) | | 2311 = x'o00c700' | 
| | | | | 2314/2319 = x'00C700' | 
| | | | | 3330 = X'019300' | 
| | | | 3340 = X'015B00' (35MB) | 
| | | | | X'02B700' (70MB) | 
| | | | | 
| | 246-247 | | Used for alignment. | 
| | (F6-F7) | | | 
fe ae ee es SH pael| 1 PE eee rae een 
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‘agp’ =—DTFIS LOAD (cont...) 


for ee ol Se ee © a gh, eee Sl 


| DIF | Module | | | | 
| Assembly | DSECT | | | | 
| Label | Label | Bytes  |Bits| Function | 
|&Filename.E|IJHKXTBL| 248-251 | | First entry in DSKXTN table | 
eS | | | (F8-FB) | | (logical unit, cell number). | 
ee ee ee ecg 
| | | 256-259 | | X'FFFFFFFF' = End of DSKXTN | 
| | | (100-103) | | table. (Note 2) | 
| | | | | | 

| | | 260-263 | | Address of IOAREA2. 
| | eae | | 
H | | 264-267 | |Address used to relocate IOAREA2. | 
| | | (108-108) | | | 
{bt | ——_{ 
| | 
| Notes: | 
| | 

1. Each entry in the DSKXTN table is four bytes long. The 
y 
| minimum number of entries is two. There is one entry per | 
| extent. | 
| | 
| 2. Location of the end-of-table indicator depends on length | 
| of DSKXTN table. | 
| 

ae 1 


Numbers in parentheses are displacements in hexadecimal notation. 
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DTFIS ADD 


(ea ee ee ho 
| DIF | Module | [ | 
| Assembly | DSECT | | | 
| Label | Label | Bytes [|Bits| 
IJHCCCB 0-15 
(0-F) 


&Filename 


16 (10) [0-1 ot used. 

= COBOL open ignore option. 

= Track hold specified. 

= DIF table address constants 
relocated by OPENR. 

Not used. 

1 = Data set security. 

1 = Wrong block size error 


during addition to file. 


NOU 


17-19 
(11-13) 


Logic module address. 


20 (14) File type for OPEN/CLOSE 


(X'25' = ADD). 
IJHCOPT | 21 (15) Option byte. 

Not used. 

1 Prime data in core. 

1 Cylinder overflow. 

1 = Cylinder index in core. 
Blocked records. 
Verify. 

used. 


PurwNeo 


7 


Zz 
(e) 
r+ 


22-28 
(16-1C) 


DIF file name. 


indicator. 
x'oo' 
X'ou' 
x'o4' 
x'08' 
x'o9' 
X'oA' 


2311 
2314/2319 
3330 

3340 general 
3340 35MB 
3340 70MB. 


&Filename.C|IJHCSTBY| 30 (1E) Status byte. 


1 = Uncorrectable DASD error 


OQ 


(except WLR). 

WLR error. 

EOF (sequential). 

No record found. 

Illegal ID specified. 
Duplicate record sensed. 
Overflow area full. 


NOU PF WNE 
a 


iCobu to bow ou 


Record retrieved from 
overflow area. 
IJHCHNDV| 31 (1F) 
2311 

2314/2319 

3330 

3340 general 

3340 35MB 

3340 7OMB. 

Relative position of the DSKXTNN 
(logical unit, cell number) 

table (in words). This value is 
the length of the DIF table 
devided by 4. 

a a i a a ee ee 


S 
- 
hou uw wou 


IJHCPNT 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
[ 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 32 (20) 
| 

| 

| 

| 


| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | i 
‘ae 29 (1D) | | Prime data device type | 
| 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | 
| | | | 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
ighest level index device type. | 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


3-84 IBM VSE/Advanced Functions Handbook 


1985 


Licensed Material - Property of IBM 


DTFIS ADD (cont...) 


© Copyright IBM Corp. 1985 


— T T if a a | 
| DTF | Module | | | 
| Assembly | DSECT | | | | 
| Label | Label | Bytes  [Bits| Function 
fe 
| | 33-35 | | First prime data record in | 
| | | (21-23) | | cylinder (HHR). | 
| | | | | 
| | 36-37 | | Last prime data track in 
| | (24-25) | | cylinder (HH). | 
| | | | | 
| | | 38 (26) | | High record number on master 
| | | | index/cylinder index track (R). 
| | | | 
| |IJHCPDH | 39 (27) | | High record number on prime | 
| | | | data track (R). 
| | | | | 
| | | 40 (28) | | High record number on overflow | 
| | | | track (R). 
| | | | 
| |IJHCSTH | 41 (29) | | High record number on shared | 
| | | | track (R). 
| | | | 
| |IJHCTIH | 42 (2A) | | High record number on track 
| | | | | index track (R). 
| | | [ 
{IJHCRTR | 43 (2B) | | Retrieval byte. 
| | | O | 1 = WORKR area specified. 
| | | | 1 | 1 = WORKS area specified. 
| | | | 2 | Overflow switch. 
| | | | 3 | 1 = Read. 
| | | | 4 | Not used. 
| | | | 5 |, 1= Output. 
| | | 6 | 1 = Write key. 
| {| 7 | 1 = PUT macro issued. 
| | | | 
| 44-50 | | Prime data lower limit | 
| (26-32) | | (MBBCCHH). 
| | 
|IJHCCIS | 51-57 | | Cylinder index lower limit 
| | (33-39) | | (MBBCCHH). | 
| | | | | 
IJHCMIS 58-64 | | Master index lower limit 
| (34-40) | | (MBBCCHH) . 
| | | 
JIJHCILN | 65 (41) | | Switches. | 
| | | | O | 1 = From WAITF routine. 
| 1 | 1 = WAITF seek check bit. 
| | {2-3 | Not used. 
| 4 | 1 = RPS type device (data). 
| | 5 | 1 = RPS type DTF. 
| | | | 6 |! 1 = Master index. 
| | | 7 | 1 = RPS type device (index). 
| | 
&Filename.H!IJHCCLPA| 66~73 | | Last prime data record address 
| | (42-49) | | (MBBCCHHR) . 
| | 
IJHCRESZ} 74-75 | | Logical record length (RECSIZE). 
(4A-4B) | | 
| | | 
; IJHCKYSZ! 76-77 | | Key length (KEYLEN). H 
| (4C-~4D) | | | 
| LJHCBLSZ 78-79 | | Block size (logical record | 
(4E-4F) | | length times number of records). 
| | 
; IJHCRL10} 80-81 | | Overflow record length (logical 
(50-51) | ; record length + 10). 
ee eer: = een =i: L 
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DIF 
Assembly 
Label 


OTFiIS ADD (cont...) 


IBM 


&Filename.S|IJHCSADR 


&Filename.W| IJHCBKCT 


&Filename.P| IJHACPRC 


| (81-85) 


IJHACLCA | 134-138 
| (86-8A) 


IJHACLMA| 139-143 


1 = Last prime data track full. 
1 = Block complete. 


Last track index normal entry 
address (CCHHR). 


Last cylinder index entry 
address (CCHHR). 


Last master index entry 
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ie T T T ae | 
| Module | | | | 
| DSECT | | | | 
| Label | Bytes |Bits | Function | 
| —+ ee 
| IJHCBFAC| 82-83 | | Blocking factor (number of logi-— 
| | (52-53) | | cal records in block (NRECDS)). 
| | | 
| | 84-85 | | Index entry length 
| | (54-55) | | (key length + 10). 
| | | 
| IJHCABCD| 86-87 | | Prime data record length (key 
| | (56-57) | | length plus physical record 
| | | length (block size)). 
| | | 
| | 88-89 | | Overflow record length plus key 
| | (58-59) | (key length + logical record 
| | length + 10). 
| | 
| IJHCCMAX| 90-91 | Prime data record format length 
| (5A4-5B) | (key length + block size + 8). 
| 
| 92-93 | Overflow record format length 
| (5C-5D) | (key length + logical record 
| | | length + 18). 
| | 
| IJHCKYLC| 94-95 | | Key location (KEYLOC) for 
| | (SE-5F) | | blocked records. 
| | | 
| | 96-97 | | Constant = 5. 
| | (60-61) | | 
| | 98-99 | | Constant = 10. 
fae coal 
| IJHCATB2| 100-101 | | Displacement of Part 2 of the 
| | (64-65) | | DIFIS table from start of 
| | | | Part 1. 
| | | | 
| IJHCATB3| 102-103 | | Displacement of Part 3 of the 
| | (66-67) | | DIFIS table from start of 
| | | | Part 1. 
| | | | 
| 104-113 | | Seek/search address area 
| | (68-71) | | (MBBCCHHRFP). 
| | | | 
| 114-123 | | Random/sequential retrieval 
| | (72-7B) | | work area. 
| | | 
| 124-127 | | Prime data record count. 
| | (7C-7F) | | 
IJHACSTI| 128 | | Status indicators. 
| (80) [0-1 | Not used. 
| | 2 | 1 = File Closed. 
| {3-5 | Not used. 
| | | 
| | | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 


| 
| 
| 
| 
| 
| 
| 
| ISHACLTA | 129-133 
| 
| 
| 
| 
| 
| 
| 


. | (8B-8F) 


address (CCHHR). 
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vey DTFIS ADD (cont...) 


C3 | a aa i i, ae | 
| DIF | Module | | | | 
| Assembly | DSECT | | | 
| Label | Label | Bytes |Bits| Function | 
L — j—}- ! 
| | IJHACLOA|144-151 | | Last independent overflow 
; ‘, | | |(90-97) | | record address (MBBCCHHR). 
hs al | | | | | | 
— |&Filename.I|IJHACOTC| 152-153 | | Number of independent overflow | 
| | |(98-99) | | tracks. | 
| | | 
|&Filename.A|IJHACOFC|154-155_ | | Number of full cylinder | 
| | (9A-9B) | overflow areas. | 
| | | | | | 
|&Filename.0O|IJHACORC|156-157 | | Overflow record count. | 
| ee ee ee | 
| | IJHACOLL| 158-164 | | Independent overflow area | 
| | (9E-A4) | | lower limit (MBBCCHH). | 
| | | 
| | IJHACOUP| 165-171 | Independent overflow area 
| | (A5-AB) | | upper limit (MBBCCHH). 
| | | 
| IJHAHRAA|172-175 | A(&Filename.D) ~— Address of 
| | | (AC—AF) | | work area for cylinder overflow 
| control record (COCR). | 
| | | | | 
|176-179 | | A(&Filename.D+8) — Address of 
| (BO-B3) | work area for the current track | 
| | | | index normal entry count field. 
| | | | 
| 180-183 A(&Filename.D+16) — Address of | 
| | | (B4-B7) | work area for current track 
| | | | index overflow entry count 
| field. | 
| | | | | 
| | 184-187 | A(&Filename.D+24) — Address of | 
| | (B8—BB) work area for current prime 
| | | data record count field. 
| | | | | | 
| | 188-191 | A(&Filename.D+32) — Address of | 
| | | (BC-BF) | work area for current overflow 
| | | | | record count field. | 
| | | | 
| | {192-195 | | A(&Filename.D+40) — Address of 
| |(co-c3) | | work area for track index normal| 
Bed | | | entry data field. | 
co | | | | 
| | IJHADLNK| 196-199 | A(&Filename.D+50) — Address of | 
| }(C4-C7) | work area for current overflow | 
| | | | record linkage field. | 
| | | 
| IJHAARAD| 200-203 | AC&IOAREAL) — Address of 
| (C8-CB) | | IOAREAL, the I/O area used for 
| | adding records to a file. 
& | a 
e | | IJHACUSE| 204-207 | | A(&WORKL) — Address of WORKL, | 
— (CC-CF) | work area containing user data | 
| | records to be added to the 
| | | | file. 
| | | 
IJHADKEY|208-211 | A(&Filename.K) — Address of the | 
| | (DO-D3)_—s |, | ADD key area. 
| | 
212-215 A(&IOAREAL+8) — Address of key 
a |(D4-D7) | position in IOAREAL. | 
: | | | 
ed | I JHAKLNS | 216-219 | A(&IOAREAL+8+&KEYLEN) — Address | 
| (D8-DB ) | of data position in IOAREAL. 
Lo aoa ame ere Se oe ea SD 
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DTFIS ADD (cont...) 


[ T T 

| DIF | Module | | | 

| Assembly | DSECT | | | | 

| Label | Label | Bytes |Bits| Function 

b+ | fp 

|&Filename.2|IJHCASAD| 0-3 | | A(&Filename.S+3) — Address of 

| | | (O-3) | | the seek/search address areat3. 

| | | | | 

| | | 4 (4) | 0 | 1 = Seek check indicated. 

| | | J1-S | Not used. 

| | | | 6 | 1 = Over/under seek has occured. | 

| | | | 7 | 1 = An error has been found, but| 

| | | | | a seek check is indicated. | 

| | | | | | 

| | | 5-7 | | A(&Filename.W) —Addr. of random/| 

| | | (-7) | | sequential retrieval work area. | 

i—_________L.__—_ | i — 

| The following information is generated if the cylinder index in | 

| core option is specified. | 
T T ——| 

| |IJHCORST| 12-15 | | A(&INDAREA) ~— Starting address 

| | | (OC-OF) | | of main storage area specified | 

| | | | | for cylinder index. | 

| | | | | | 

| | | 16-17 | | AL2(&INDSIZE) — Number of bytes | 

| | | (10-11) | | in main storage available for | 

| | | | | cylinder index. | 

| | | | | | 

| | | 18-25 | | Next cylinder index entry to be | 

| | | (12-19) | | read (MBBCCHHR). 

| | | | | | 

| | | 26-30 | | Last cylinder index entry 

| | | C1A-1E) | | (CCHHR). 

| | | | | | 

| | IJHCORBT| 31(1F) | | Core index byte. 

| | | | 0 | 1 = First time through 

| | | | | B-transient, $SBINDEX. | 

| | | | 1 | 1 = End of cyl. index reached. 

| | | | 2 | 1 = Index skip option specified. | 

| | | 3 | 1 = Suppress in-core option | 

| | | | | and read cylinder index. | 

| | | {4-7 | Not used. 

| | | | | | 

| | IJHCORKY| 32-35 | | Pointer to key (stored by 

| | | (1D-23) | | module). 

}-—_______- el ee ! i | 


word boundary. 


| 

| 

| 

| 

| | IJHPSIZE| 36-37 

| ! : (24-25) 
| | IJHPMAX | 38-39 

| | | (26-27) 
| | IJHPDSP1i| 40-43 

| | | (28-2B} 
| | IJHPDSP2| 44-47 

| | | (2C-2F) 
| |IJHPSW | 48(30) 
| | | 

| | | 

| | | 49(31) 
| | IJHDCWRK| 50-51 

| | 1082233) 


3-88 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


The following information is generated if the prime data in core | 
add function is specified. This information is aligned on a double 


Size of IOAREAL. 


Maximum 
records 


number of prime data | 
in main storage. 


Address of write CCWs. | 


Address of read CCWs. 


Switch byte. 
1 = EOF. 

Not used. 
Reserved. 


Work field for I/O module. 
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DTFIS ADD (cont...) 


DTF 
Assembly 
Label 


- 
| Module 
DSECT 
Label 


| 
| 
| 
| 
| 


eye 


ww 


C 


a 


&Filename.B 


&Filename.D 


&Filename.E 


Sea ee | 
to 
< 
ct 
© 
a 


| (0-7) 
IJHCCCW | 


| IJHACOCR | 128-135 


(80-87) 


| 
IJHACTNA| 136-143 
(88-8F) 


IJHACTOA| 144-151 
| (90-97) 


| 

| 

| IJHACRID| 152-159 
| (98-9F) 
| 

| 

| 

| 


IJHACFID| 160-167 
(A0-A7 ) 


| IJHACTIN 


168-177 
| (A8-B1) 
I JHACLNK | 178-187 
(B2-BB) 
| 
IJHACTIA| 188-197 
| (BC-CS5) 


IJHAGATE| 198 
| | (C6) 
| 


| 199-201 
| (C7-C9 ) 
| 

| IJHAOCOH | 202-203 
| | (CA-CB) 
| 

| 204-211 
| (CC-D3) 


| 
| IJHAICOM| 212-217 
(D4—D9) 
| 
| 


IJHAISKY | 218-223 
(DA-DF ) 
| 


224~227 
| (EO-E3) 


232-235 
| (E8-EB) 
2 Soon 
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Function 


aaa 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
i 


CCW X'07', &Filename.St+1, X'40', 
6 — Long seek CCW with command 


chaining. 


Channel program build area. 


Cylinder overflow control 


record (COCR). 


Current track index normal 
entry count field address. 


Current track index overflow 
entry count field address. 


Current prime data record count 


field address. 


Current overflow record count 


field address. 


Track index normal entry data 


field. 


Current overflow record 
sequence link field. 


Current track index overflow 


entry data field. 


X'01' — Add to EOF. 
X'02' — Add to independent 


overflow area. 


Overflow control bytes (CCH). 
High HR on overflow track. 
Volume upper limit for prime 


data records (MBBCCHHR). 


CLC O(&KEYLEN,13),0(6) — 


Unblocked 


CLC 0(&KEYLEN, 13) ,&KEYLOC—1(6) 
Blocked Utility CLC for key. 


MVC O(&KEYLEN,13),0(12) — 


Unblocked 


MVC O(&KEYLEN, 13) ,&KEYLOC—1(12) 
— Blocked Utility MVC for key. 


First entry in DSKXTN table 
(logical unit, cell number). 
(Note 1) 


4X'FF' ~ End of DSKXTN table. 


(Note 2) 
ej 


Chapter 3. 


Iocs 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
rl 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
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DTFIS ADD (cont...) 


SS so aa Pa 1 
| DIF | Module | l | | 
| Assembly | DSECT | | | | 
| Label | Label | Bytes |Bits| Function | 
— —s — 
|&Filename.K| | 236+ | ey area for ADD only. Number 

| | 

| | 


| | 
| | 
| | 
| 1. Each entry in the DSKXTN table is four bytes long. The | 
| minimum number of entries is two. There is one entry | 
| per extent. | 
| | 
| | 
| | 
| | 


2. Location of the end-of-table indicator depends on length 
of DSKXTN table. 


Numbers in parentheses are displacements in hexadecimal notation. 
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- % DTFIS RETRVE, RANDOM 


vw i372, 2%- So 1. | ely 
| DTF | Module | 
| Assembly | DSECT | | 
iB 
{+ 


| Label | Label | Bytes 
— 


&Filename IJHCCCB 


0-15 
(0-F) 


Not used. 

GET issued. 

COBOL open ignore option. 
HOLD option specified. | 
DTF table address constants | 
relocated by OPENR. 
Not used. | 
1 = Different blocksize in for-— | 
mat—1 label than in DTFIS. 


| 
| 
| 
16 (10) | 
| 
| 


et et 
ou 


17-19 | 
(11-13) 


Address of logic module. 


20 (14) File type for OPEN/CLOSE 


(X'26' = RETRVE). 


IJHCOPT 21 (15) | Option byte. 

Not used. 
Prime data in core. 
Cylinder overflow option. 
Cyl. index in core option. 
Blocked records. 
Verify. 
ot used. 


Wot we it tt 


WF wnHr Oo 


22-28 
(16-1C) 


File name (DTF name). 


| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

! 
IJHCPDDV| 29 (1D) | Prime data device type. 
| x'oo' = 2311 
| X'01' = 2314/2319 
| x'04' = 3330 
| x'os8' 3340 general 
| X'09' = 3340 35MB 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


X'oA' 3340 70OMB. 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


hound ao 


&Filename.C|IJHCSTBY| 30 (1E) Status byte. 

1 = Uncorrectable disk error 
(except WLR error). 

WLR error. 

EOF (sequential). 

No record found. 

Tllegal ID specified. 
Duplicate record sensed. 
Overflow area full. 
Record retrieved from 


overflow area. 


fo) 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


| | 
—w | 


NAUP WNP 
Woueuw wo a non 


a 


31 (1F) High level index device type. 
x'00' = 2311 

X'01' = 2314/2319 

x'04' 3330 

X'08' = 3340 general 

x'o9' 3340 35MB 

X'OA' = 3340 7OMB. 


Hou uu whet 


32 (20) Relative position of the DSKXTN 
logical unit, cell number) table 
(in words). This value is the 
length of the DTF table divided 
by 4. 

wr a | 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
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T 
| 


T 


{ oh T 1 
| DTF | Module | | 
| Assembly | DSECT | | | 
| Label | Label | Bytes [Bits | Function | 
—— {+-——_+— : 7 
| | | 33-35 First prime data record in | 
| | | (21-23) | | cylinder (HHR). | 
| | | | | | Sy 
| | | 36-37. | Last prime data track in | yo 
| | | (24-25) | cylinder (HH). | t 
| | | | | Se 
| | | 38 (26) | High record number on master | “> 
| | | | index/cylinder index track (R). | 
| | | | | 
| | IJHCPDH | 39 (27) | High record number on prime | 
| | | | | data track (R). | 
| | | | 
| | | 40 (28) High record number on overflow | 
| | | | track (R). | - 
| | | | | (a 
| | IJHCSTH | 41 (29) High record number on shared | : 
| | | track (R). | Ene 
| | | | 
| | IJHCTIH | 42 (2A) | High record number on track | 
| | | | index track (R). | 
| | | | 
| IJHCRTR | 43 (2B) | Retrieval byte. | 
| | | 0 1 = WORKR specified. | 
| | | 1 | 1 = WORKS specified. | 
| | | 2 Overflow switch. | 
| | | 3 1 = Read key. | 
| | | 4 Not used. | 
| | | 5 | 1 = Output. | 
| | 6 1 = Write key. | 
| | | 7 1 = PUT macro issued. i 
| | | | | 
| | | 44-50 | Prime data lower limit | 
| | | (20-32) | | (MBBCCHH). | 
| | | 
| |IJHCCIS | 51-57 | Cylinder index lower limit 
| | | (33-39) | | (MBBCCHH). | 
| | | | 
| | IJHCMIS | 58-64 | Master index lower limit | 
| | (3A-40) | | (MBBCCHH). | 
| | | | | | 
| | IJHCILN | 65 (41) | | Switches. | 
| | | | O {| 1 = From WAITF routine. | oe 
| | 1 | 1 = Seek check from WAITF. | f 
| | | | 2 | 1 = Data track held. | 7 
| | 3. | 1 = Index track held. | Ni a 
| | | 4 | 1 = RPS type device (data). | 
| | | 5 | 1 = RPS type DTF. | 
| | 6 | 1 = Master index. | 
| | | | 7 | 1 = RPS type device (index). | 
| | | | 
| | IJHCCLPA| 66-73 | | Last prime data record address | 
| | | (42-49) | (MBBCCHHR) . | 
| | | | aa 
| | IJHCRESZ| 74-75 | Logical record length. | f 
eee) pS 
| | IJHCKYS2| 76-77 Key length. | 
| | | (4C~4D) | | ) 
| | IJHCBLSZ| 78-79 | Block size (logical record | 
| | | (4E-4F) | | length times number of records). | 
| | | 
| | IJHCRL10] 80-81 ‘| | Overflow record length (logical | 
| | (50-51) record length + 10). | 


- 
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f \ DTFIS RETRVE, RANDOM (cont...) 


| — 
| DTF | Module | | | | 
| Assembly | DSECT | | | | 
| Label | Label | Bytes |Bits| Function | 
| | LJHCBFAC| 82-83 | | Blocking factor. | 
| | } (52-53) |] | | 
Ps | | | | | | 
; | | | 84-85 | | Index entry length (key length | 
w | i sh ee | 
| 
| | ISJHCABCD| 86-87 | | Prime data record length (key | 
| | | (56-57) | | length + physical record length)| 
| | | | | | 
| | 88-89 | | Overflow record length with key | 
| | | (58-59) | | (key length + logical record | 
| | | | ! length + 10). | 
| | | | | | 
geet | | IJHCCMAX| 90-91 | | Prime data record format length | 
‘ : | | | (SA-5B) | | (key length + physical record | 
‘3 af | | | | ! length + 8). 
| | | 92-93 | | Overflow record format length | 
| | | (5C-5D) | | (key length + logical record 
| | | length + 18). 
| | | | 
| | IJHCKYLC|] 94-95 | | Key location (blocked records). | 
| | | ESF) || | 
| | | | | 
| | 96-97 | | Constant = 5. 
! | (60-61) | | 
| | | 98-99 | | Constant = 10. | 
(62-63) | | | 
| | | | | 
IJHCATB2|100-101 | | Displacement of Part 2 of the | 
(64-65) | | DIFIS table from Part 1. 
| | 
| IJHCATB3|{102-103 | | Displacement of Part 3 of the 
| (66-67) | | DTFIS table from Part 1. 
| | | | 
|&Filename.S}IJHCSADR|104-113 | | Seek/search address area | 
| | (68-71) | | (MBBCCHHRFP) . | 
| | | 
|&Filename.W|IJHCBCKT|114-123 | | Random/sequential retrieval 
| 1(72-7B) | | work area. 
t mht LL Ho j 
~—' DTFIS RETRVE, RANDOM (cont...) 
cs i a T= J ce 7 
| DIF Module | | | | 
| Assembly DSECT | | | | 
| Label Label Bytes |Bits| Function | 
|&Filename.2}IJHCASAD| 0-3 | | Address of seek/search address | 
8 | | (0-3) | | area + 3. 
we ma | | | | 
! ; | | 4 | 0 | 1 = Seek check indicated. | 
| (4) | 1-5} Not used. 
| | | 6 | 1 = Over/under seek has occurred 
| | 7 | 1 = An error has been found, but 
| | | a seek check is indicated. | 
| | | | 
| 5-7 | | Address of random/sequential \ 
| |} (5-7) | | retrieval work area. H 
| | | 
» % | |IJHSIOAR| 8-11 | | Address of IOAREAS. 
: | | (8-B) | | 
en. y \ en _L Hos 
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DTFIS RETRVE, RANDOM (cont...) 


[is at Pe i ene eae) Ceo yee At ep wag Re wre 


| DIF | Module | | | | 
| Assembly | DSECT | | | | 
| Label | Label | Bytes [Bits] Function | 


| IJHCRARA| 12-15 Address of IOAREAR. 


| | | | 

| | (CF) | | | ; 

| | | | | f 

| | IJHCRKEY| 16-19 | | Address of KEYARG. | 

| | | (10-13) | | | a 

| | | | | | “ 

| {IJHCRWOR| 20-23 | | Address of WORKR. | 

| | (14-17) | | | 

| |IJHSDB1 | 24-27 | | Current sequential I/O area 

| | | (18-1B) | | address. | 

| | IJHSLIOR| 28-31 | | 4—byte NO-OP instruction, or 

| | | (1C-1F) | | L IOREG,*-4 if IOREG was | | 

| | | | | specified. | f 

| | | | | | 

| | IJHSLMIT| 32 (20) | | X'00' = No verify, | s 

| i | | | X'40' = Verify. | 

| | | | | | 

| | | 33 (21) | | x'o8' = Unblocked, | 

| | | | X'00' = Blocked. | 

| | | | | | 

| | | 34 | | R = First prime data record on | 

| | | (22) | shared track. | 

| | | | | | 

| | | 35-39 | | Upper limit for sequential | 

| | | (23-27) | | retrieval (CCHHR). | 

| | | | | | 

| |ISHSINIT| 40-41 | | H'O' = Blocked records. | 

| | | (28-29) | | H'2' = Overflow record. | 

| | | | | H'8' = Unblocked records. | 

| | | | | 

| | 42 | | x'c7' = 2311, 2314, or 2319; | 

| | | (2a) | | X'FF' = 3330, 3340. | 

| | | | | | 

| | | 43-47 | | Initial values for sequential | 

| | | (2B-2F) | | retrieval. | 

| | | | | | 

|&Filename.H|IJHSCADR| 48-55 | Current disk address for | 

| | | (30-37) | | sequential (MBBCCHHR). | 

| | | | | | 

| | IJHSCOVF| 56-63 | | Current overflow disk address | y 

| | | (38-3F) | | for sequential (MBBCCHHR). | f 

| | | | | | 

| | IJHSRCNT| 64-65 | | Sequential record counter. | KO 

| | | (40-41) | | | 

| | | | | | 

| | IJHSTICU| 66-67 | | Current track index entry for 

| | | (42-43) | | sequential (HR). | 

| | | | | | 

|&Filename.T| | 68-69 | Number of records tagged for 

| | | (44-45) | | deletion. | 

| | | | | | ci 

| |IJHRREGS| 70-71 | | Load IOREG for random retrieval. | fi 

| | | (46-47) | | | i. 
\: 

| | | | | | “; 

|&Filename.G|IJHRIDSV| 72-79 | | DASD address save area | 

| | | (48-4F) | | (MBBCCHHR) . | 

| | | | | | 

| | IJHRADSV| 80-83 | | Record pointer within I/O area | 

| | | (50-53) | | for write operation. | 

| | | | | | 

|&Filename.R| IJHROVCN| 84-87 | | Nonfirst overflow record count. | 

| | | (54-57) | | | ¢ 
\ 
Ds 
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a TR 

Bf \ 

yo y DTFIS RETRVE, RANDOM (cont...) 
fo eas 2 i ag, ce se ee ee ey ee Oe 
| DTF | Module | | | 
| Assembly | DSECT | | | | 
| Label | Label | Bytes |Bits | Function | 


| The following information is generated when the cylinder index in | 
|| core option is specified. 


oe | |IJHCORST| 92-95 | | A(SINDAREA) — Starting address | 

vm | | | (SC-5F) | | of main storage area specified | 
| | | | | for cylinder index. | 
| | | 96-97 | | AL2(&INDSIZE) - Number of bytes | 
| | (60-61) | | in main storage available for | 
| | | | | cylinder index. | 
| | | | | | 
| | | 98-105 | | Next cylinder index entry to be | 

a | | | (62-69) | | read (MBBCCHHR). (initialized | 

- OS | | | | | by $$BINDEX to cylinder index | 

—w | | | | | starting address.) | 
| 
| | | 106-110 | | Last cylinder index entry. | 
| | |(6A-6E) | | | 
| | | | | | 
| | } 411 | | Core index byte: | 
| | | (6F) | 0 | 1 = First time through transient| 
| | | | 1 | 1 = End of index reached. | 
| | | | 2 | 1 = Index skip option. | 
| | | |3-7 | Not used. 
| | | | | | 
| | ISHCORKY| 112-115 | | Pointer to key (stored by the | 
| | eae | | module). | 
| | | | | 
| | | 116-131 | | Reserved. | 
| | | (74-83) | | | 
L i pe ep ey = 

DTFIS RETRVE, RANDOM (cont...) 
ao — T Tx ce | 1 
| DTF | Module | | | | 
| Assembly | DSECT | | | | 
| Label | Label | Bytes |Bits | Function | 
|&Filename.B| | 0-7 | | X'07',&Filename.S+1,X'40',6 —- | 
| | | (o-7) | | Long seek CCW with command | 
: | j | | | chaining. 

— | | | i | | 

wy | |rgHcccw | 8-63 | | Area to build CCW string. | 
| | | (8-3F) | | | 
| | | | | | 
|&Filename.E| | 64-67 | | First entry in DSKXTN table 
| | | (40-43) | | (logical unit, cell number). | 
| | | | | (Note 1) | 
| | | | | | 
| | | 72-75 | | 4X'FF' End of DSKXTN table. | 
| | | (48-4B) | | (Note 2) | 


| 

| 1. The length of one entry is the four bytes shown here. 

| The minimum number of entries is 2. There is one entry 
| per extent. 
| 

| 

| 

| 


2. The location of the end-of-table indicator depends on 
length of DSKXTN table. 


Ih ass a 


i _ Numbers in parentheses are displacements in hexadecimal notation. 
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DTFIS RETRVE, SEQNTL 
| DIF 


| Assembly 
| Label 


| Module | | 
| DSEcT | | 
| Label | Bytes | 


| | 
| | 
| Function | 
IJHCCCB 0-15 
(0-F) 


&Filename Command Control Block (CCB). 


16 
(10) 


used. 

GET issued. : 
COBOL open ignore option. 
Track hold specified. 

DIF table address constants 
relocated by OPENR. 

EOF on sequential retrieve. 
Data set security. 

Different block size in for— 
mat—1 label than in DTFIS. 


mal 
Wouou 


17-19 
(11-13) 


Address of logic module. 


20 
(14) 


File type for OPEN/CLOSE 
(X'26' = RETRVE). 
IJHCOPT | 21 
(15) 


Option byte. 

Not used. 

Prime data in core. 
Cylinder overflow option. 
Cylinder index in core 
option. 

Blocked records. 

Verify. 

IOAREAS just used, 
ITOAREA2 just used. 


WNeHO 


ry 
Hou dl 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


mM OR Re 
ono ue tt 


22-28 
(16-1C) 


File name (DTF name). 


IJHCPDDV| 29 


(1D) 


| Prime data device type. 
x'00' 


2311 
2314/2319 
3330 

3340 general 
3340 35MB 
3340 7OMB. 


{| x'ou' 
| x'o4' 
| x'og' 
| x'os' 
| 
| 


uu nt ad out 


X'OA' 


IJHCSTBY| 30 


(1E) 


&Filename.C Status byte. 

1 = Uncorrectable DASD error 
| (except WLR error). 

WLR error. 

EOF (sequential). 

No record found. 

Illegal ID specified. 
Duplicate record sensed. 
Overflow area full. 
Record retrieved from 
overflow area. 


jo) 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


| 
| 


SEDO PWD YH 
ee 
Hou dow th iu 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| IJHCHNDV| 31 High level index device type. 
X'00' = 2311 

| X'O1' = 2314/2319 

| x'o4' = 3330 

| '08' = 3340 general 

X'09' = 3340 35MB 


X'oA' 3340 7OMB. 


poms 


e~* 


Ke 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


| 
| 
| 
| 
| 
ns 
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| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
Two I/O areas present. | 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
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| Bane T 7 
| DTF | Module 
Assembly | DSECT | 
Label Label Bytes Bits Function 
7 
IJHCPNT 32 (20) Relative position of the DSKXIN 
(logical unit, cell number) 
table (in words). This value 
is the length of the DTF table 
devided by 4. 
| | | 
| | 33-35 | First prime data record in 
| (21-23) | cylinder (HHR). 
| | 
| | 36-37 | Last prime data track in 
| | (24-25) | cylinder (HH). 
| | | | 
| | 38 (26) | High record number on master 
| | index/cylinder index track (R). 
| | 
| | IJHCPDH | 39 (27) High record number on prime 
| | data track (R). 
| | 
| 40 (28) High record number on overflow 
| | track (R). 
| 
| IJHCSTH 41 (29) | High record number on shared 
| | | track (R). 
| | | 
| IJHCTIH | 42 (2A) | High record number on track 
| | index track (R). 
| | | 
| IJHCRTR | 43 (2B) | Retrieval byte. 
| | ane) 1 = WORKER specified. 
| | { 1 1 = WORKS specified. 
| | 2 Overflow switch. 
| | 3 1 = Read key. 
| 4 1 = First record being processed 
| | (after issuing SETL macro). 
| 5 1 = Output. 
6 1 = Write key. 
7 1 = PUT macro issued. 
44-50 Prime data lower limit (MBBCCHH) | 
(2C-32) | 
IJHCCIS { 51-57 | Cylinder index lower limit 
(33-39) | (MBBCCHH) . 
| | 
TJHCMIS 58-64 | Master index lower limit 
| (34-40) | (MBBCCHH) . 
t 
IJHCILN 65 (41) | Switches. 
| | O | 1 = From WAITF routine. 
| ! 1 {| 1 = WAITF seek check bit. 
| 2-3 Not used. 
4 1 = RPS type device (data). 
5 | 1 = RPS type DTF. 
| 6 1 = Master index. 
| 7 1 = RPS type device (index). 
j IJHCCLPA| 66-73 Last prime data record address 
| (42-49) | (MBBCCHHR). | 
| | 
IJHCRESZ| 74-75 | Logical record length. 
| (44-4B) | 
| | | | 
| ; LJHCKYSZ| 76-77 | | Key length. 
| (4C—4D) i ; 
H 1 J. ! See eee | 
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DTFIS RETRVE, SEQNTL (cont...) 


f T T T 

| DIF | Module | | | 

| Assembly | DSECT | | | 

| Label | Label | Bytes {Bits Function 
y 


| IJHCBLSZ| 78-79 
| | (4E-4F) 


Block size (logical record 
length times number of records). 


IJHCRL10| 80-81 Overflow record length (logical 


oe 


| 
| 
| 
| 
| | | | 
| | | | 
| | | | | 
| | | | | 
| | | (50-51) | | record length + 10). | 
| | | | | | 
| | ISHCBFAC| 82-83 | | Blocking factor. | 
| | | (52-53) | | 
| | | | | | 
| | | 84-85 | | Index entry length (key length | 
| | | (54-55) | | +10). | 
| | IJHCABCD| 86-87 | | Prime data record length (key | 7 
| | | (56-57) | | length + physical record length) | i 
| | | | | | ‘ 
| | | 88-89 | | Overflow record length with key | \. 
| | | (58-59) | | (key length + logical record | : 
| | | | | length + 10). | 
| | | | | | 
| | ITHCCMAX| 90-91 | | Prime data record format length | 
| | | (5A-5B) | | (key length + physical record 
| | | | | length + 8). | 
| | | 92-93 | | Overflow record format length | 
| | | (5C-5D) | | (key length + logical record | 
| | | | | length + 18). | 
| | | | | | 
| | IJHCKYLC| 94-95 | | Key location (blocked records). | 
| | | (SE-SF) | | | 
| | | | | | 
| | | 96-97. | | Constant = 5. 
| | | (60-61) | | | 
| | | | | | 
| | | 98-99 | | Constant = 10. | 
| | | (62-63) | | | 
| | | | | 
| | IJHCATB2|100-101 | | Displacement of Part 2 of the | 
| | |(64-65) | | DTFIS table from Part 1. | 
| | | | | | 
| | ISHCATB3|102-103 | | Displacement of Part 3 of the | 
| | | (66-67) | | DTFIS table from Part 1. | oe 
| || | f 
|&Filename.S|IJHCSADR|104-113 | | Seek/search address area | f 
| | |(68-71) | | (MBBCCHHRFP). | \ 
| | | | : 
|&Filename.W|IJHCBCKT|114-123 | | Random/sequential retrieval | 
| | |(72-7B) | | work area. 
cc Sr RT (OER A a [ae [ele pa Oa Fey Oe eo I eR AE AE 
DTFIS RETRVE, SEQNTL (cont...) 
— OO aT > --’ ORnRhnaaee se 
| DIF | Module | | | | ff 
| Assembly | DSECT | | | | \ 
| Label | Label Bytes |Bits| Function | Ro 
|&Filename.2|IJHCASAD| 0-3 | | Address of seek/search address 
| | (0-3) | | area + 3. | 
| | | | | 
| | 4 (4) | 0 | 1 = Seek check indicated. | 
| | | 1-5| Not used. 
| | | 6 | 1 = Over/under seek has occurred| 
| | | 7 | 1 = An error has been found, | 
| | | | but a seek check is indicated. | 


ee ee ee ean ne eer Ne Teel Ree aee eer a re ee 
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DTFIS RETRVE, SEQNTL (cont...) 


> oe — “3 


| DIF | 
| Assembly | 
| Label | 


Po ee be 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


&Filename.H 


| 
| 
| 
| 
| 
| 
| 
| 
&Filename.T| 
| 
| 
| 
| 
| 
| 
| 


© Copyright IBM Corp. 1985 


Module 


DSECT 


Label 


IJHSIOAR 


IJHCRARA 


IJHCRKEY 


IJHCRWOR 


IJHSDB1 


IHJISLIOR 


IJHSLMIT 


IJHSINIT 


IJHSCADR 


IJHSCOVF 


I JHSRCNT 


IJHSTICU 


T 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


| 


Bytes 


Function 


16-19 
(10-13) 


20-23 
(14-17) 


24-27 
(18-1B) 


28-31 
(1C-1F) 
32 (20) 
33 (21) 
34 (22) 
35-39 
(23-27) 
40-41 
(28-29) 
42 

(24) 


43-47 
(2B-2F) 


48-55 
(30-37) 


56-63 
(38-3F) 


64-65 
(40-41) 


66-67 
(42-43) 


68-69 


a i i i i nn re i rr en nn nn i nn i i en rn eh 


1 
Address of random/sequential 
retrieval work area. 


Address of IOAREAS. 

Address of IOAREA2. 

Address of KEYARG. 

Address of WORKR. 

Current sequential I/O area 


address. 


L IOREG,*-4 — Load IOREG if 
IOREG was specified, or a 
4-byte NO-OP instruction. 


X'00' = No verify, 

X'40' = Verify. 

X'08' = Unblocked records, 
X'00' = Blocked records. 


R = First prime data record on 
shared track. 


retrieval (CCHHR). 


Blocked records, 
Overflow record, 


t 
t 
. Unblocked records. 


tooo 


X'C7' = 2311, 2314, or 2319; 
x = 3330, 3340. 


Initial values for sequential 
(CCHHR). 


Current disk address for 
sequential retrieval (MBBCCHHR). 


Current overflow disk address 
(MBBCCHHR). 


Sequential record counter. 
Current track index entry (HR). 
Number of records tagged for 
deletion. 


For boundary alignment. 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
Upper limit for sequential | 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
i 
| 
: 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
Reserved. 

| 
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DTFIS RETRVE, SEQNTL (cont...) 

Tc T T T T 1 
| DTF | Module | | | | 
| Assembly | DSECT | | | 
| Label | Label | Bytes |Bits| Function | 
— + i— | 
|&Filename.B| 0-7 | | X'07' ,&Filename.S+i, X'40', | 
| | | (o-7) | 6 — Long seek CCW with command | 
| | | chaining. | 
| | | | | | 
| | IJHCCCW 8-63 Area to build CCW string. | 
et | 
|&Filename.E| | 64-67 | | First entry in DSKXTN table 

| | | (40-43) | (logical unit, cell number). | 
| | I | ee 
| | | 72-75 | | 4X'FF' — End of DSKXTN table. | 
| | | (48-4B) | (Note 2) | 
b { eet oo i ra oe aa 
| | 
| Notes | 
| | 
| 1. The length of one entry is the four bytes shown here. | 
| The minimum number of entries is 2. There is one entry | 
| per extent. | 
| | 
| 2. The location of the end-of—table indicator depends on | 
| length of DSKXTN table. | 
| | 
ke perevara | 


Numbers in parentheses are displacements in hexadecimal notation. 
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DTF 
Assembly 
Label 


Module 
DSECT 


Label Bytes 


Function 


0-15 
(0-F) 


16 
(10) 


T 
| 
| 
| 
&Filename |IJHCCCB 
| 
| 
| 
| 
| 


FWNr © 


17-19 
(11-13) | 


20 (15) | | 


IJHCOPT | 21 
(15) 


DRAM wWwnrro 


—S 


22-28 
(16-10) 
IJHCPDDV| 29 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| (1D) 
| 

| 

| 

| 

| 


&Filename.C|IJHCSTBY| 30 


(IE) 


oO 


| 
| 
| 
| 
| 
| 
| 
| 
| 
: 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


SMD WDN 


if 
| 
| 
| 
} 
| 
| 
| 
| 
| 
| 
| 
t 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
! 
| 
| 
| 
| 
| 
| 
| 
| IJHCHNDV| 31 
| 

| 

| 

| 

| 

| 


| 
| 
| 
| 
| 
| 
| 


cc 


B. 


Not used. 


1 
1 
1 
aL 
EO 


1 
1 


F 


Wood 


GET issued. 

COBOL open ignore option. 
Track hold option specified. 
DTF table address constants 
relocated by OPENR. 

switch. 

Data set security. 

Wrong block size error 
during addition to file. 


Logic module address. 


File type for OPEN/CLOSE 
(X'27' = ADDRTR). 


Option byte. 


No 
1 


FPOrRPrPRRPH 


DT 


t 


F 


used. 

Prime data in core. 
Cylinder overflow. 
Cylinder index in core. 
Blocked records. 
Verify. 

IOAREAS just used, 
IOAREA2 just used. 

Two I/O areas present. 


file name. 


Prime data device type indicator. 

t 
= 
xX! 
x' 
x' 
x' 


00' 
o1' 
04" 
o8' 
09' 
oA' 


2311 
2314/2319 
3330 

3340 general 
3340 35MB 
3340 70MB. 


now ow wot a 


Status byte. 


1 


ba 


Uncorrectable disk error 
(except WLR). 

WLR error. 

EOF (sequential). 

No record found. 

Illegal ID specified. 
Duplicate record sensed. 
Overflow area full. 
Record retrieved from 
overflow area. 


Highest level index device type. 


x! 
x! 
x! 
x! 
x! 
x! 


0o' = 2311 

OL’ = 2314/2319 
04' = 3330 

08' = 3340 general 
09' = 3340 35MB 
OA’ = 3340 7OMB. 
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DTFIS ADDRTR (cont...) 


int ee es Eg a Sb ee oe eT ee 


| DTF | Module | | | | 
| Assembly | DSECT | | | | 
| Label | Label Bytes [Bits| Function | 
Jpop | 
| | ISHCPNT | 32 | | Relative position of the DSKXTN | 
| | (20) | | (logical unit, cell number) 

| | | | table (in words). This value is | 
| | | | the length of the DIF table | 
| | | | devided by 4. | 
| | | | | 
| | 33-35 | | First prime data record in 

| | (21-23) | | cylinder (HHR). | 
| | | | | 
| | 36-37 || | Last prime data track in | 
| | (24-25) | | cylinder (HH). | 
| | | | | 
| | 38 (26) | | High record number on master | 
| | | | index/cylinder index track (R). | 
| | | | | 
| |IJHCPDH | 39 (27) | | High record number on prime | 
| | | | data track (R). | 
| | | | | 
| | 40 (28) | | High record number on overflow | 
: | | | track (R). | 
| | IJHCSTH | 41 (29) | | High record number on shared | 
| | | | track (R). | 
| |IJHCTIH | 42 (2A) | | High record number on track | 
| | | | index (TI) track (R). | 
| | | | | 
| | IJHCRTR 43 (2B) | | Retrieval byte. | 
| | | 0 | 1 = WORKR area specified. | 
| | | 1 | 1 = WORKS area specified. | 
| | | 2 | Overflow switch. | 
| | | 3 | 1 = Read. | 
| | | 4 | 1 = First record being | 
| | | | processed (after issuing | 
| | | | SETL macro). | 
| | | 5 | 1 = Output. | 
| | 6 | 1 = Write key. | 
| | {| 7 | 1 = PUT macro issued. | 
| | | | | 
| | | 44-50 | | Prime data lower limit | 
| | | (20-32) | | (MBBCCHH) . | 
| | | | | | 
| |IJHCCIS | 51-57 | | Cylinder index lower limit | 
| | | (33-39) | | (MBBCCHH). | 
| | | | | | 
| |IJHCMIS | 58-64 | | Master index lower limit | 
{ | | (34-40) | | (MBBCCHH). | 
| | | | | | 
| | IJHCILN | 65 (41) | | Switches. | 
| | | | O | 1 = From WAITF routine | 
| | | } 1 | 1 = Seek check from WAITF. | 
| | | {| 2 | 1 = Data track held. | 
| | | | 3. | 1 = Index track held. | 
| | | | 4 | 1 = RPS type device (data). | 
| | | | 5 | 1 = RPS type DTF. | 
| | | | 6 | 0 = Cylinder index. | 
| | | | | 1 = Master Index. | 
| | | | 7 | 1 = RPS type device (index). | 
| | | | | | 
|&Filename.H|IJHCCLPA| 66-73 | | Last prime data record address | 
| | | (42-49) | | (MBBCCHHR). | 
| |IJHCRESZ| 74-75 | | Logical record length (RECSIZE).| 
| | | (4A-4B) | | | 


ea ee an Oe Oe ee ee eS ee 


3-102 IBM VSE/Advanced Functions Handbook 


7 a ao 


~— Licensed Material - Property of IBM © Copyright IBM Corp. 1985 
i DTFIS ADDRTR (cont...) 


ee Oe ey eS, Pas eg | NC ae ee a ee 


| DIF | Module | | | 
| Assembly | DSECT | | | | 
| Label | Label | Bytes [Bits] Function | 


[/_ +}. 4} ________ 


| IJHCKYSZ| 76-77 Key length (KEYLEN). 


IJHCATB2| 100-101 
| (64-65) 
| 


Displacement of Part 2 of the 
DTFIS table from start of Part 1 


IJHCATB3| 102-103 
| (66-67) 


Displacement of Part 3 of the 
DTFIS table from start of Part 1 


| | (4C-4D) 

: | | 

{ | IJHCBLS2| 78-79 Block size (logical record 
— | | (4E-4F) length times number of records). 

| | 
| IJHCRL10| 80-81 Overflow record length (logical 
| | (50-51) record length + 10). 
| | 
| IJHCBFAC| 82-83 Blocking factor (number of 
| | (52-53) logical records in block 
| | (NRECDS)). 
| | 
| | 84-85 Index entry length (key length 
| | (54-55) + 10). 
| | 
| IJHCABCD| 86-87 Prime data record length (key 
| | (56-57) length plus physical record 
| | length (block size)). 
| 
| | 88-89 Overflow record length with key 
| | (58-59) (key length + logical record 
| | length + 10). 
| | 
| IJHCCMAX| 90-91 Prime data record format length 
| | (5A-5B) (key length + block size + 8). 
| | 
| | 92-93 Overflow record format length 
| | (5C-5D) (key length + logical record 
| | length + 18). 
| 
| IJHCKYLC | Key location (KEYLOC) for 
| | (SE-5F) blocked records. 
| | 
| | 96-97 Constant = 5. 
| | (60-61) 
| | 
| | 98-99 Constant = 10. 
| | (62-63) 
| 
| 
| 
| 
| 
| 


&Filename.S|IJHCSADR|104—113 
| | (68-71) 
| 


Seek/search address area. 


&Filename.W| IJHCBKCT| 114-123 


Random/sequential retrieval 
| (72-7B) 


work area. 


&Filename. P| IJHACPRC| 124-127 Prime data record count. 


| 
IJHACLTA| 129-133 


Last track index normal entry 
| (81-85) 


address (CCHHR). 


| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
[ | 
| | 
| | 
| | 
[ | 
94-95 | | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 


| (70-7F) 
| ITHACSTI | 128 Status indicators. 
| | (80) 0-1 | Not used. 
| | 2 1 = File closed. 
| | 3-5 | Not used. 
| | 6 1 = Last prime data track full. 
| | 7 1 = Block complete. 
| 
| 
| 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
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DTFIS ADDRTR (cont...) 


IJHADLNK| 196-199 
| (C4—C7) 


| 
IJHAARAD | 200-203 
| (C8-CB} 


IJHACUSE | 204-207 
| (CC-CF) 
| 


I JHADKEY | 208-211 


© Copyright IBM Corp. 1985 


normal entry data field. 


A(&Filename.D+50) — Address of 
work area for current overflow 
record sequence—link field. 


AC&IOAREAL) — Address of 
IOAREAL, the I/O area used for 
adding records to a file. 


A(&WORKL) — Address of WORKL, 
work area containing user data 


records to be added to the file. 


A(&Filename.K) — Address of the 


| Sian AN SEL PMT Sa LIE | T ic rn ae | 
| DIF | Module | | | 

| Assembly | DSECT | | | 

| Label | Label | Bytes [Bits | Function 

| es ee a eee 

| | IJHACLCA|134-138 | | Last cylinder index entry 

| oe | | address (CCHHR). 

| | IJHACLMA| 139-143 | | Last master index entry address 
| | (8B-8F) | | (CCHHR). 

| | IJHACLOA] 144-151 | | Last independent overflow 

| | | (90-97) | | record address (MBBCCHHR). 

| | | 

|&Filename.I|IJHACOTC| 152-153 | | Number of independent overflow 
| | | ¢€98-99) | | tracks. 

| | | | | 

|&Filename.A|IJHACOFC| 154-155 | | Number of full cylinder 

| | | (9A-9B) | | overflow areas. 

| | | | 

|&Filename.O| IJHACORC|156-157 | | Overflow record count. 

| | | (9C-8D) | | 

| | IJHACOLL| 158-164 | | Independent overflow area lower 
| | | (QE-A4) | | limit (MBBCCHH). 

| 

| | IJHACOUP | 165-171 | | Independent overflow area upper 
| | [| (A5~AB) | | limit (MBBCCHH). 

| | | | 

| | ISHAHRAA|172-175 | | A(&Filename.D) — Address of work 
| | | (AC-AF) | | area for cylinder overflow 

| | | | | control record (COCR). 

| | | | 

| | }176-179 | | A(&Filename.D+8) — Address of 
| | | (BO-B3) | | work area for the current track 
| | | | | index normal entry count 

| | | | | field. 

| | | | | 

| | }180-183 | | A(&Filename.D+16) — Address of 
| | | (B4-B7) | | work area for current track 

| | | | | index overflow entry count 

| | | | | field. 

| i | | | 

| | [184-187 | | A(&Filename.D+24) — Address of 
i} | | (B8-BB) | | work area for current prime 

| | | | | data record count field. 

| | 

| | [188-191 | | A(&Filename.D+32) — Address of 
| | |(BC-BF) | | work area for current overflow 
| | | | | record count field. 

i | | | [ 

| | [192-195 | | A(&Filename.D+40) — Address of 
| f |(co-c3) | | work area for track index 

| | | | | 

| | | | | 

| | | | 

| | | | 

| | | | 

| | | | 

| | | | 

i | | | 

| | ~ | | 

| | | | 

| | | | 

| | | | 

| | | | 

| | | | 

| | | | 

| | | | 


| (DO-D3) 


ADD key area. 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
i 
| 
| 
| 
| 


a 
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a is Sais ia TT T ee | 

| DTF | Module | | | | 

| Assembly | DSECT | | | | 

| Label | Label | Bytes |Bits| Function | 

po —| 

| | [212-215 | | AC(&IOAREAL+8) — Address of key | 

| | |(D4-D7) | | position in IOAREAL. | 

| | | | | | 

| | IJHAKLN8 [216-219 | | A(&IOAREAL+8+&KEYLEN) — Address | 

| | | (D8-DB) | | of data position in IOAREAL. | 
DTFIS ADDRTR (cont...) 

— a = St 1 

| DIF | Module | | | 

| Assembly | DSECT | | | | 

| Label | Label | Bytes Bits | Function | 

| +-———}j— 4 ! 

|&Filename.2|IJHCASAD| 0-3 | | A(&Filename.S+3) — Address of 

| | | (o-3) | | the seek/search address areat3. 

| | | | | 

| | | 4 (4) | 0 | 1 = Seek check indicated. 

| | | 1-5| Not used. 

| | 6 | 1 = Over/under seek has 

| | i | | occurred. 

| | 7 | 1 = An error has been found, but 

| | | a seek check is indicated. 

| | | | | | 

| | | 5-7 | A(&Filename.W) — Address of the 

| | (5-7) | random/sequential retrieval 

| | | | | work area. | 

| | | 

| |IJHSIOAR| 8-11 | Address of IOAREAS, I/O area | 

| | | (8-B) | | used for sequential retrieval. 

| | | | 

| | IJHCRARA] 12-15 | | Address of IOAREAR, I/O area | 

| | | (C-F) | used for random retrieval or 

| | | address of IOAREA2 (if speci- | 

| | | | | fied) for sequential retrieval. | 

| | | | 

| | IJHCRKEY| 16-19 Address of KEYARG, field | 

| | | (10-13) | containing user—-supplied key | 

| | | | used for random READ/WRITE | 

| | | | operations and sequential | 

| | | | retrieval initiated by key. | 

| | | 

| |IJHCRWOR| 20-23 | Address of WORKR, work area | 

| | (14-17) | | used for random retrieval. 

| | | | 

| |IJHSDB1 | 24-27 | Current sequential I/O area 

| | (18-1B) | address. 

| | | | 

| IJHSLIOR| 28-31 | 1. L IOREG,*-4 — Load 1/0 

| | (1C-1F) | | register for sequential or 

| | | 2. 4byte NO-OP instruction | 

| | | | for random. 

| | | | 

| IJHSLMIT| 32 (20) | X'00' = No Verify; 

| | | X'40' = Verify. 

| | | 

| | 33 (21) | X'00' = Blocked; | 

| | | X'08' = Unblocked. 

| | | | 

| | 34 (22) | R = First prime data record on | 

| | | shared track. 

| | 

| | | 35-39 | Limits for sequential (CCHHR). | 

| | (23527) | | 

t Sere. aes wal fn 
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[pore ee Oem we i ea a ae See On a ee yh 


| DIF | Module | 
| Assembly | DSECT | 
| Label | Label | 

IJHSINIT| 


| 
| 
| 
{ 
| 
| 
| 
| 
| | 
| 


&Filename.H| IJHSCADR 
IJHSCOVF 
IJHSRCNT 
IJHSTICU 
&Filename.T 


IJHRREGS 


| 
| 
| 
| 
| 


&Filename.G|IJHRIDSV 


| 

| 

| IJHRADSV 

| 

| 
&Filename.R|IJHROVCN 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| | 


IJHCORST 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


| 
| 
| 
| 
| 
| 


en a a ee a te a te A ce SA a aL Ne SoS Ser 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


: 


core option is specified. 


Bytes 
40-41 
(28-29) 
42 (2A) 
43-47 
(2B-2F) 


48-55 
(30-37) 


56-63 
(38—-3F) 


64-65 
(40-41) 


66-67 
(42-43) 


68-69 
(44-45) 


70-71 
(46-47) 


72-79 
(48-4F) 


80-83 
(50-53) 


84-87 
(54-57) 


92-95 
(5C-5F) 


96-97 
(60-61) 


98-105 
(62-69) 


106-110 


(6A-6E) 


IJHCORBT|111 (6F) 


IJHCORKY | 112-115 


(70-73) 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


Bits 


WHR © 


£ 


| 
| 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
-7 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


| 

| 
Function | 
H'O' = Blocked records. 
H'2' = Overflow record. 
H'8' = Unblocked records. 


X'C7' = 2311, 2314, or 2319; 
= 3330, 3340. 


Initial values for sequential. 
Current sequential DASD address 
(MBBCCHHR) . 


Current overflow DASD address 
(MBBCCHHR). 


Sequential record count. 
Current track index entry for 
sequential CHR). 


Number of records tagged for 
deletion. 


LR &IOREG,O for random (or 
2-byte NO-OP for sequential). 


DASD address save area for 
random retrieval (MBBCCHHR). 


Record pointer within I/O area 
for write (for random retrieval) 


Nonfirst overflow record count. 


The following information is generated if the cylinder index in 
Bytes 88-91 (58-5B) are not used. | 


Se 


AC&INDAREA) ~— Starting address 
of main storage area specified 
for cylinder index. 


AL2(&INDSIZE) — Number of bytes 
in main storage available for 
cylinder index. 


Next cylinder index entry to 
be read (MBBCCHHR). 


(CCHHR) . 


Core index byte. 
1 = First time through $SBINDEX. 


1 End of cyl. index reached. 


1 Index skip option specified. 
1 = Suppr. index in-core option 
and read cylinder index. 

Not used. 


Pointer to key 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
Last cylinder index entry | 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
(stored by module). | 


| rece eee a en ee I ane EY LEE EEE (Se A RCo ae a ee en NER | 
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L aj DTFIS ADDRTR (cont...) 
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| DTF | Module | | | | 
| Assembly | DSECT | | | | 
| Label | Label | Bytes [Bits| Function | 


| The following information is generated if the prime data in-core | 
| add function is specified. This information is aligned on a double | 
| word boundary. If both cylinder index in-core and prime data | 
| in-core add functions are specified, the following information is | 
| found in bytes 116~131 (74-83). | 


| IJHPSIZE| 116-117 
| | (74-75) 
| 


Size of IOAREAL. 


IJHPMAX |118-119 Maximum number of prime data 


IJHDCWRK| 130-131 
| (82-83) 


Work field for I/O module. 


| | | | 

| | | | 

| | | | | 

| | | | | 

: | | | (76-77) | | records in main storage. | 

L aG | | IJHPDSP1|120-123 | | Address of write CCWs. | 
“g ‘ | i | (78-7B) | | | 
ae | | | | | | 
| | IJHPDSP2|124-127 | | Address of read CCWs. | 

| | | (70-7F) | | | 

| | | | | | 

| JIJHPSW |128(80) | | Switch byte. | 

| ! | | 0 | 1 = EOF (Bits 1-7 not used). | 

| 

| | {129 (81) | | Reserved. | 

| | | | | | 

| | | | | 

| | | | | 


DTFIS ADDRTR (cont...) 


f =a ae Gee Se ee 

| DTF | Module | | | 

| Assembly | DSECT | | | 

| Label | Label [ Bytes | Bits | Function 

&Filename.B] | 0-7 X'07', &Filename.S+1, X'40', 
| | (0-7) 6 — Long seek CCW with command 
| | chaining. 
| I 
|IJHCCCW | 8-63 Channel program build area. 
| | (8-3F) 
| | 64-127 Channel program build area for 
] | | (40-7F) add function only. 

| | 


| 

| 

| 

| 

| 

| 

| 

| 

| 
&Filename.D|IJHACOCR| 128-135 | 
| eee 

IJHACTNA| 136-143 | 

|(88-8F) | 
| | 
| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 


Cylinder overflow control 
record (COCR). 


| 

| 

| 

| 

| 

| 

| 

| 

| 

[ 

| 

| 

| 

| Current track index normal 
| entry count field. 

| 

| Current track index overflow 
| entry count field. 

| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


IJHACTOA| 144-151 
| (90-97) 
| 

Current prime data record count 

field. 


Lani 


IJHACFID| 160-167 
| (AO-A7) 
| 


Current overflow record count 
field. 


IJHACTIN| 168-177 
| (A8—B1) 


Track index normal entry data 
field. 


IJHACLNK | 178-187 Current overflow record 


BPE, Sct ER ES 88S ete oh eae eS ees a ES ah 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| | 

| | 

| | 

| | 

| | 

| | 

| ima ere 
| 

| | 

| | 

| | 

| | 

| | 

| | 

| | 

| | 

| | 


Veco et | (B2-BB) sequence-link field. 
nn i: tek Raines Veins 27 JSeiaes Senin ae eae eerie ie ae eee em emeeeareet) 
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DTFIS AGDRTR (cont...) 


| DTF 
| Assembly 
| Label 


Unblocked . 

| (DA-DF) MVC OC&KEYLEN, 13) ,&KEYLOC—1(i2) 
| — Blocked Utility MVC for key. 
| 

&Filename.E | 224-227 First entry in DSKXTN table 
| (E0-E3) (logical unit, cell number). 
| (Note 1) 
| 
1232-235 4X'FF' — End of DSKXIN table. 
| (E8-EB) (Note 2) 
| 

&Filename.K | 236+ Key area for add only. Number 
| (EC-end) of bytes depends on key length, 
| KEYLEN. 

[——_—___—_4 ponte f a='l {_ 

Notes: 
1. Each entry in the DSKXTIN table is four bytes long. The 


| Module | 
| DSECT | 
| Label | Bytes 


| IJHACTIA| 188-197 
| | (BC-C5) 
| 


IJHAGATE | 198 

| (C6) 

| 

| 
199-201 
(C7-C9) 


IJHAOCOH| 202-203 
(CA-CB) 


| 204-211 
(CC-D3) 
| 


IJHAICOM| 212-217 


| (D4—D9) 
| 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| IJHAISKY| 218-223 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


Function 


Current track index overflow 
entry data field. 


X'01' — Add to EOF. 
X'02' — Add to independent 
overflow area. 


Overflow control bytes (CCH). 

High HR on overflow track. 

Volume upper limit for prime 

data records (MBBCCHHR). 

CLC O(&KEYLEN,13),0(6) — 
Unblocked 

CLC O0C&KEYLEN, 13) ,&KEYLOC—1 (6) 

- Blocked Utility CLC for key. 


MVC 0(SKEYLEN,13),0(12) — 


© Copyright IBM Corp. 1985 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


minimum number of entries is two. There is one entry per 


extent. 


of DSKXTN table. 


. Location of the end-of-table indicator depends on length 


aly 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
J 


Numbers in parentheses are displacements in hexadecimal notation. 
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im FE ~T ~T om 
| DIF | | | 
| peemy | Bytes faa Function 
Labe 
\— jp 1 
|&Filename | 0-15 | | Command Control Block (CCB). The CCW | 
| | (O-F) | | address in bytes 9-11 (09-O0B) is changed 
‘ | | | | by OPEN to point to a DTF Extension in the 
oe | | | | user virtual area. CLOSE restores it. 
rd | | | | 
| | 16 | O | 1 = Dequeue old volume extents. | 
| | (10) | 1 | 1 = Dummy OPEN to obtain extents from 
| | | label track. 
| | 2 | 1 = File assigned 'IGN' (COBOL). 
| | | 3 1 = Track hold option specified. 
| 4 1 = DIF relocated by OPENR. 
| | 5 | 1 = Input trailer labels to be processed 
gre | | | | at close time (COBOL only). | 
‘ \ | 6 1 = Spanned processing. 
te y | ! | 1 = COBOL end-of-extent option specified. | 
| 17-19 | | Address of logic module. OPEN changes this 
| (11-13) address to point to the logic module in | 
| the system virtual area. Close restores it. | 
| | | 
| | 20 DTF type for OPEN/CLOSE (X'20' = sequen~ 
|} (14) | tial access DASD files). | 
| | 
| 21 | 0 | 1 = Not Used. 
| (15) 1 1 = Blocked file. | 
| 2 1 = Work file. 
3 | 1 = Work area specified. 
| 4 | 1 = Not a Version 1 type table. 
| 5 | 1 = Open, 0 = Closed. 
| 6 1 = Input, 0 = Output. | 
| | | 7 | 1 = User labels specified. 
| 
| 22-28 Filename (DTF Name). 
(16~1C) | 
| | | 
| 29 Device Type Code: 
| (1D) X'oo' = 2311 X'09' = 3340 35MB 
| | X'O1' = 2314, 2319 X'0A' = 3340 70MB_ | 
| | X'04' = 3330-1, -2 X'OB' = 3375 | 
| | X'05' = 3330-11 X'0C'’ = 3380 
| X'07' = 3350 X'90' = FBA device 
| | X'08' = 3340 general | 
re; | | | Note: In previous versions, last byte of | 
=a | filename contains device type code. | 
| 
| 30-35 | Address of Format 1 label in VTOC (BCCHHR | 
(1E-23) or PBN). 
| 36-37 | Volume sequence number. | 
1 (24-25) | 
| | | 
pees | 38 Open communications byte. 
: \ | (26) Input File 
od | | | 0 1 = No more extents. | 
| { 1 1 = Update file. | 
| 2 1 = Process trailer labels. 
3 1 = Exit to user's EOF routine. 
| 4 1 = Next extent on new volume. 
5 1 = Return to close routine. 
j 6 1 = Process header labels. 
7 1 = Extent switch. 
we at aiken 


(General) 


3-109 


Licensed Material - Property of IBM 


DTFSD (Data Files) (cont...) 


© Copyright !BM Corp. 1985 


PBN = maximum block number if FBA 
Note: The last two digits of CCHH are 


replaced by the 


current head number 


when the type 128 version of the 


(eae ee ee wegen 1 
| DTF | | | | 
| Assembly | Bytes |Bits| Function | 
| Label | | | | 
L +——+— 4 
| | 38 | | Output File | 
| | (26) | 0 | 1 = No more extents. | 
| |Ccont.}| 1 | 1 = Extents needed at close time. | 
| | | 2 | 1 = Process trailer labels. | 
| | | 3 | 1 = Process header labels. | 
| | | 4 | 1 = Next extent on new volume. | 
| | | 5 | 1 = Extents entered via console. | 
| | | 6 | 1 = Process trailer labels at close. | 
| | | 7 | 1 = Check extent for minimum of two tracks. | 
| | | | | 
| | 39 | 0 | 1 = Extent bypassed before file is opened | 
| | (27) | | (Input only). | 
1 1 = FEOVD has been issued (Input only). 

| | |0-7 | Sequence number of current extent opened | 
| | | | (Output only). | 
| | | | | 
| 140 (28)| | Sequence number of last extent opened. | 
| | | | | 
| 141-43 | | Address of user's label routine. | 
| eo aes | 
| | 44 | 0 | Not used. | 
| | (20) | 1 | 1 = Device supports RPS. | 
| | {| 2 | 1 = Version 3 DTF. | 
| | |0-7 | Not used. | 
| | | | | 
| 45-47 | | Address of IOAREA1. | 
| (2D-2F) | | | 
| | | | 
| {48-51 | | Address of user's label track (X‘80000000')| 
| (30-33) | | CCHH for CKD and device address for FBA. | 
| | | | | 
| 52-53 | | Lower head limit (HH); zeros for FBA. | 
nina 
| \54-57 | | Extent upper limit (CCHH) for CKD; device | 
| | (36-39) | | address for FBA. | 
| | | | 
&Filename.S|58-59 | | Seek address (BB): X'0000' if a disk 

| (3A-3B) | | device; zero for FBA. | 

| | | | 

|60-63 | | Search argument (CCHH); physical block 

| (3C-3F) | | number for FBA. | 
| | | | | 
| | 64 | | Record number: 0 for FBA; 0 for output, 1 | 

| (40) | | for input for CKD. | 
| | | | 
| |65-67 | EOF address if input file. Key length and | 
| | (41-43) | data length if output file. | 
| | | | | 
| [68-71 | | CCHH = X'00C80009' if 2311 - type 1 | 
| | (44-47) | CCHH = X'00C80013' if 2314 or 2319 — type 1] 
| H | CCHH = X'01940012' if 3330 — type 1 | 
| | | CCHH = X'03280012' if 3330-11 — type 1 | 
| | CCHH = X'015CO00B' if 3340 35MB | 
| | CCHH = X'02B8000B' if 3340 70MB | 
| | | CCHH = X'022B001D' if 3350 — type 1 | 
| | | CCHH = X'03B2000B' if 3375 | 
| | CCHH = X'0375000E' if 3380 | 
| | | 
| | | 
| | | 
| | | 
| | | 


device is specified. 
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DTFSD (Data Files) (cont...) 


Woo a si ae ee 


| DIF | | | 
| Assembly | Bytes |Bits| 
| Label | | | 
| hy oda ‘al | 
| | (48) | | 
| | | | 
| | | | 
| [ 73. 3] | 
| | (49) | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | o | 
| | | | 
| | | | 
| | baad 
| | | | 
| | |) 2.4 
| | es 
| | | 4 | 
| | | | 
| | [a 
| | | | 
| | ee 
| | | 7 | 
| | | | 
| | | | 
| | | oO | 
| | | | 
| | Ky SE 
| | | | 
| | | | 
| | be ied 
| | | | 
| | i ca 
| | | 4 | 
| | | 5 
| | | | 
| | as ae | 
| | | | 
| | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | oO | 
| | [o> shes] 
| | fe 
| | [ 4 
| | | 4 | 
| | Loy) 
| | ae | 
| | | | 
|&Filename.B| 74-75 | | 
| ee : 
| | 76-80 | | 
| (40-50) | 

| | | 
| | 

| | | 
| 81 (51) | 1 

| | 

| 81-83 | | 
| (51-53) | 

| | | 


Function 


For fixed length records only: Number of 
records per track (input), number of 
records per track minus one (output). 


Switch byte used by the logic modules for 
various switching purposes. Functions 
indicated are for the ON condition (1) of 
the respective bit. 


Fixed Length Record Modules 
Not first entry after Open (INPUT and 


UPDATE). 

Not first write after Open (OUTPUT) 
Short record (INPUT and UPDATE 

without truncation). 

Partial block written (OUTPUT). 
ERROPT=SKIP (INPUT), TRUNCS=YES (OUTPUT). 
End—of-file record written (OUTPUT). 
End of extent CUPDATE). 

Truncation not specified (used by OPEN 
routines). 

Write block of records (UPDATE). 

End of file (UPDATE). 


Variable Length Record Modules 
Not first entry after OPEN (INPUT and 


UPDATE). Write record (OUTPUT). 

Wrong length record (INPUT), TRUNCS=YES 
(OUTPUT). Second GET operation performed 
(UPDATE) . 

Return to close routine (OUTPUT). Update 
specified (UPDATE). 

Not first entry after OPEN (OUTPUT). 

New extent required by CLOSE, 

Capacity of I/O area exceeded (OUTPUT). 
Second GET required (UPDATE). 

Not first read (INPUT). Second GET issued 
(UPDATE). 

Unnecessary to read (INPUT). Track capa-— 
city exceeded (OUTPUT).Save record count 
(UPDATE ) 


Undefined Length Record Modules 

Not first entry after OPEN (All modules). 
Save record count (UPDATE). 

Return to close routine (OUTPUT). 

Second GET issued (UPDATE). 

Not used. 

PUT command issued (UPDATE). 

End of file reached (UPDATE). 


Block size minus one. 


Extent lower limit and record number. 
Initialize with the current PBN/track 
address: 

CCHHR for CKD, track address for FBA. 


1 = FEOVD has been issued (output only). 
Address of user wrong-length record 


routine if input file. Track capacity 
counter if output file. 
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DTFSD (Data Files) (cont...) \ 


Se SI 
| DIF | | | | 
| Assembly | Bytes |Bits| Function | 
| Label | 
84-87 Instruction to load user's register IOREG. 


| 
Note: This field is a NOP unless blocked | 
records are processed in one I/0 | 
areas, or two I/O areas are | 
specified and records are processed | 
in the I/O areas. | 


| only if BLKSIZE=MAX specified | 
EERE EERE eee 


The following section is added to the DTFSD table for variable— 
length record, and spanned record input files. 


— { 
| | 88-91 | | Address of current available Input/Output 
| eae area. 
| | 
| | 92-95 | | Logical record size. | ra 
| oe) | : 
| | 96-99 | | Address of end of input/output area. | : 
| (60-63) | 
| | | | 
| 100 | | Logical indicators | 
| (64) | O | 1 = ERROPT = address. 
| | 1 | 1 = ERROPT = IGNORE. 
| | | 2 | 1 = ERROPT = SKIP. | 
| | | 3 | 1 = VERIFY = YES. 
| | 4 | 1 = Two I/O areas. | 
| | | 5 | 1 = WLRERR = address (Fixed length and 
| | I variable records.) 
| | 1 = Output file (Undefined length records). 
| 6 | 1 = Fixed length records. | 
| | | 0 = Variable or undefined length records. 
| | 7 | Control parameter specified. 
| | | 
| 101-103 | Address of user's read error routine. 
| | (65-67) | | | 
| = 1 zs 
| The following section is added to the DIFSD table for fixed-length | 
| record output files. 
E 
| If CONTROL is not specified: | 
| . au 1 — 
| 160-163] | End-of-extent routine address | 
| (A0-A3) | | (primarily used by COBOL compiler). | £ 
| oa 1 f 
| If CONTROL = YES: | > 
| ——T : 
| 184-187 | | End-of-extent routine address | 
| | (B8-BB) | | (primarily used by COBOL compiler). | 
% ates 
| | 
| | 


| If UPDATE is not specified: 


|I£ CONTROL = YES: * | 


foe 


| (B4-B7) | | 
aE ts a 


{176-179 | | Logical record length. | 
pert 
|180-183| | RX type instruction. | 
| 
4 
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DTFSD (Data Files) (cont...) 


r aa ar i i= | 
| DTF | | | | 
| Assembly Bytes |Bits Function | 
| Label | | | 
L- Se — 
184 | 0O | Not used. | 
| (B8) 1 | 1 = Skip segment. | 
7 | 2 | 1 = Spanned first time. | 
: | | 3 | Not used. | 
er 4 | Not used. | 
| {| 5 | Not used. 
| | 6 | Not used. | 
| 7 | Not used. | 
| 
| 185-187! Pointer in logical record. | 
| (B9-BB) | | | 
ai i — | 
| *These bytes are always generated when spanned processing is | 
no specified. The following section is added to the DTFSD table for | 
: \ | variable-length spanned record update files. | 
— F a at Sao 4 
216-219 | Logical record length. | 
| | (D8—DB) | | 
220-223 | RX type instruction. Load record 
| cea ! | 
| | 224 | O | Not used. 
| | (EO) | 1 | 1 = Skip segment. | 
| | 2 | 1 = Spanned first time. 
| | 3 | 1 = Null segment. | 
| | 4 | 1 = Spanned PUT return. | 
| {5-6 | Not used. 
| | i 7 | 1 = No update. | 
| | | 
| 225-227 | | Pointer in logical record. | 
| (E1-E3) | | 
| 228-235 | | Not used. 
| | (E4~-EB) | 
| 
236-239 | | Extent status save area. | 
| | (EC-EF) | 
eee ee | 
| The following section is added to the DIFSD table for variable— 
| length spanned record output files. | 
= = = 4 
; | | 160-163 Space remaining in output area. 
— | jcao-asy] | | 
| 1164-165 | Track capacity. 
| | (A4—AS) | | | 
| 166-169 | | Instruction to load user's register | 
(A6-A9 ) VARBLD. (If VARBLD is not specified, | 
| | | instruction is NO-OP.). | 
- md 
oN | If CONTROL = YES: * | 
7 - SS SS SSS SS 
er | 170-172 | Not used. | 
(AA~AC) | | 
| | | 
173-175 | | End-of-extent routine address | 
| (AD-AF ) | (primarily used by COBOL compiler). | 
L 1 ce S| 
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DTFSD (Data Files) (cont...) 


[ee oe ee 


| DIF 
| Assembly 
| Label 


| Bytes |Bits| Function 


sis, 


| The following section is added to the DIFSD table for variable— 
| length spanned record output files. 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


| 200-203 | 
| (c8—cB) | 


| 2064-207 
| (CC-CF 


208 
(D0) 


| 

| 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 


| 209-211] 
| (D1-D3) | 


|212-219| 
| (D4—DB) | 


| 220-223| 
| (DC-DF) | 


NOU WNFH O 


Logical record length. 


RX type instruction. Store a record size. 


Not used. 

used. 

Leading segment. 

Output block truncated. 
End of track. 

Track truncated. 

Save count. 

Volumes spanned. 


Z 
(e) 
ct 


| ee | | 


Pointer in logical record. 
Not used. 


Extent status save area. 


- 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


| The following section is added to the DIFSD table for undefined 
| length record output, files. 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


| 160-161 
| (A0-A1) | 


| Track capacity. 


| 


| If CONTROL = YES: 


| 162-164 | 
eee 


| 164-167 | 
| (A4-A7) | 


Not used. 


End—of—extent routine address 


| 
| 
| 
| (primarily used by COBOL compiler). 


Numbers in parantheses are displacements in hexadecimal notation. 
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DTFSD (Work Files) 


Ca oe Sa 
| DIF | | | | 
| Assembly | Bytes |Bits| Function | 
| Label | | | | 
le 
|&Filename | 0-15 | | Command Control Block (CCB). 
| | (O-F) | | Note: The CCW address in bytes 9-11 (09-0B)| 
| | | | is changed by OPEN to point to 
| | | | DIF Extension in the user virtual | 
| | | | area. CLOSE restores it. | 
| | | | 
| | 16 |C-1 | Not used. | 
| | (10) | 2 | 1 File assigned 'IGN' (COBOL). | 
| | | 3 | 1 = Track hold option specified. | 
| | | 4 | 1 = DTF relocated by OPENR. | 
| | [5-7 | Not used. | 
| | | | | 
| |17-19 | | Address of logic module. (OPEN changes 
| | (11-13) | | this address to point to the logic module | 
& 
| | | | in the SVA. CLOSE restores it.) | 
| | | | | 
| 20 | | DIF type for OPEN/CLOSE (X'20' = sequen-— | 
| | (14) | | tial access disk files). | 
| | | | | 
| | 21 | © | 0 = Disk device. | 
| | (15) | 1 | 1 = CLOSE macro is not to delete format-1 | 
| | | i and format-3 file labels. | 
| | | 2 | 1 = Work file. | 
| | | 3 | Type of open: 1 = Point, 0 = Normal. | 
| | | 4 | 1 = Routine entered from close routine. | 
| | | 5 | 1 = File opened. 0 = File closed. | 
| | | 6 | Not used. | 
| | | 7 | 1 = Reentry to close routine. | 
| | | | | 
| {22-28 | | Filename (DTF Name). | 
| fetal 
| | 29 | | Device Type Code: | 
| | cip) | | x'oo' = 2311 | 
| | | | x'o1' = 2314, 2319 | 
"04' = 3330- —2 
| | | | eos! = ees | 
| | | | x'07' = 3350 | 
| | | | X'08' = 3340 general | 
| | | | X'09' = 3340 35MB [ 
| | | | x’ 0a! = 3340 70MB ! 
X OB’ = 3375 
| | | | x'oc' = 3380 | 
| | | | X'90' = FBA device | 
| | | | Note: In previous versions, last byte of | 
| | | filename contains device type code. | 
| | | | | 
| | 30-31 | | Track capacity counter. | 
| (ae 
| 32-35 | | Address of format-1 label in VTOC. CCHHR | 
| | (20-23) | | for CKD; PBN address for FBA. | 
| | | | | 
| 136 (24)] | Extent sequence number. | 
| | | | | 
| | 37 | | Open communications byte. | 
| | (25) | O | Not used. | 
| | | 1 | 1 = Device supports RPS. | 
| | 2 | 1 = Version 3 DTF. | 
| | | 3 | 1 = Symbolic unit in DTF. | 
| | | 4 | 1 = Next extent on new volume. | 
| | | 5 | 1 = Extent opened. | 
| | |6-7 | Not used. 


a 
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DTFSD (Work Files) (cont...) 


| Note: Only if BLKSIZE=MAX specified 


a et ed 


om 
| DIF | | | | 
| Assembly | Bytes |Bits| Function | 
| Label | { | | 
a 4 
| 138 (26)| | Lower head limit for CKD; zero for FBA. | 
| | | 
| [39 (27) | | Upper head limit for CKD; zero for FBA. | 
| | | | | 
|&Filename.L|40-41 | | Record length. | 
| ee i | 
| |42-45 | | Initial extent lower limit for CKD; | 
| | (24-2D) | | Initial extent lower limit PBN for FBA. | 
| | | | 
| {46-49 | | Current extent lower limit for CKD; | 
| | (2E-31) | | Current extent lower limit PBN for FBA. 
| | | | 
| [50-53 | | Extent upper limit for CKD; Current | 
| | (32-35) | | extent upper limit PBN for FBA. | 
| | | | 
|&Filename.S|54-55 | | Seek address (BB=X'0000') for CKD; | 
| | (36-37) | | not used for FBA. | 
| | | | 
| {56-59 | | Search address (CCHH) for CKD; | 
| | (38-3B) | | PBN for FBA. | 
| | | | | 
| {60 (3C)| | Record number for CKD; zero for FBA. | 
| | | | | 
| | 61 | | Switch byte used by logic module. 
| | (3D) | O | 1 = First write entry indicator. | 
| | {| 1 | 1 = Write update indicator. | 
| | | 2 | 1 = POINTS macro issued. | 
| | | 2 | Not first record on track. (RECFORM=UNDEF). | 
| | | 4 | 1 = Track upper limit reached. | 
| | | 5 | Not used. | 
| | | 6 | 1 = Check after read/write. | 
| | | 7 | Not used. | 
| | | | | 
{&Filename |62-63 | | Maximum record length. | 
| (Note 1) | (3E-3F)| | | 
| | | | | 
| {64 (40) | | Not used. | 
| | | | | 
| {65-67 | | Address of user's EOF routine. | 
| | (41-43) | | | 
| | | | | 
| | 68 | | Logical indicators. | 
| | (44) | 0 | 1 = ERROPT = address. | 
| | {| 1 | 1 = ERROPT = IGNORE. | 
| | | 2 | 1 = Fixed-length unblocked records. | 
| | | 3 | 1 = Verify specified. | 
| | | 4 | 1 = ERROPT = SKIP. | 
| | | 5 | 1 = Reread after read error. | 
| | {6-7 | Not used. | 
| | | | | 
| {69-71 | | Address of user read/write error routine. | 
| | (45-47) | | | 
— aa 4 
| 
| 
| 


Numbers in parantheses are displacements in hexadecimal notation. 
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DTFMT Data Area (Common Part for all Record Formats) 


(0) |IJJTDTF 
(0) |DTFCCB 


8 (8) DTFOFFS 


| 
| 
| 
| 
| 
| 
| 
| 
16 = |DTFFL1 
(10) |DTFFIRST 
| DTFOPEN 
| DIFCBIGN 
| DTFCBUSA 


| DTFRELO 


| 

| DIFSPN 

| DIFASCII 
| DIFLNGCK 


| 
| 
| 
17 (11) |DTFIOMOD 


20 
(14) 


| 0 
| 0 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| DTFTYPE 
| 

| 

| 

| 

| 


} 21 | DTFFLAG2 

| (15)  |DTFFRST2 

| 

| DTFBLK 

| DTF2I0 

| | 

| DTFWA 

| | DTFINP 

| | DTFBWD 

| 

| DTFCHKPT 

| | DTFTRUNC 

| 

| 22 (16) |DTFFILNM 
| 

29 (1D)| * 


| 
| 30 (1E)|DTFCCWCD 


31 | DTFFLAG3 
| (1F)  |DTFVDISP 
| 

|DTFV21 
| | DIFCBREW 


| DTFDHDR 
t 


| Bytes and 
| Offset |Field Name| Bit Pattern] Description 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


! 


1 


1 


3 


1 


1 


x'8o' 
x'40' 
x'20' 
xX'10' 


x'08' 
x'04' 


x'02' 
X'ou' 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


Command Control Block CCB 

use structure IORBADR to locate 
data in the CCB 

Note that the address of the 


channel program will be replaced 
by the address of the DTF Extension 


when the file is opened. 
Buffer offset length ASCII 


Flag Byte 1 

first time entered IOMOD 
1=file is opened 

COBOL open ignore option 
ANSI COBOL 

only if std or nonstd files 
DIF table address constants 
relocated by SSBOPENR 
spanned record format 
1=ASCII O=EBCDIC 

if ASCII input: length check 
if ASCII output: buffer offset 
length=4 


address of logic module 


DTF file type 
X'10'=workfile 

X'11'=nonstd or unlabeled 
X'12'=std labeled output 
X'13'=std labeled input bwd 
X'14'=std labeled input fwd 


X'15'=std labeled work files 


Flag Byte 2 

O=first time entry 
l=not first time entry 
1=blocked 

O=1 I/O area 

1=2 I/O areas 
1=Workarea 

1=Input 

1=Backwards 

also used for POINTW 
1=Checkpoint records 
1=TRUNC required during close 


Symbolic file name 
Not used 
Command Code for CCW 


Flag byte 3 

displacement to locate the 
variable fields in DTF 

1=DTF Version 2.1 onwards 

used by COBOL files for rewind 
set to '1' by COBOL 


1985 


1=Header label and EOV info wanted | 
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DTFMT Data Area (Common Part for all Record Formats) (cont.. 


| 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
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| DTFFLAG4 
Gans | DTFSTDLB 
| DIFNSTD 


| 
| DTFREWUN 


| DTFNOREW 
| 


| DTFBWD2 
| DTFULAB 
| DTFNOTM 
| DTFSOEOF 


33 (21) |DTFULBRT 


36 | DIFFLAGS 
(24)  |DTFPH 
| DIFCBLBL 


| DIFINP2 
| DIFEOVF 
| DIFEOFV 


| DTFOPENO 
| DTFVSPN 
| DTFUTIL 


| 
| DIFUDEF 


37 (25)|DTFUEOF 


20 | DIFBLKCT 
(28) | 

| 

| 

| 
44 | DTFVARX 
(2c) | 

| 

| 
44 (2C) | * 


56 (38) |DTFCCWO 
56 (38) |DTFCCWC 


57 (39) |DTFIOA1 


64 | DTFIOA2 
(40) | 
68 (44)| * 


88 | DTFXPH 
(58) | 


| Bytes and 
| Offset |Field Name| Bit Pattern| Description 


12 


OO 


20 


x's8o' 
x'40' 
x'20' 
x'10' 
x'08' 
x'04' 
x'02' 
x'o1' 


| 


Flag Byte 4 
1=STD Labels 


=unlabeled tape file 
l=nonstandard labeled file 
=rewind unload modified by 


COBOL 


modified by COBOL on close 
O=REWIND 1=NO REWIND 


1=BACKWARDS 


1=User label routine specified 
1=TM option not specified 
EOF-EOV switch (IBM Sort) 


address of user label routine 


Flag Byte 5 


1=DTF build by DTFPH 
COBOL label indicator 
l=user label routine on input file 


1=input 


1=force EOV switch 
EOF-EOV switch (output) 


1=EOF 
O=EOV 


1=file is opened (for VSAM ) 
l=variable or spanned records 
this bit is modified by any 


unknown utility 


l=undefined records 


address of user EOF routine 


block count 


for workfiles initialized to 
00000000 for read forward 
00400000 for read backward 


start of variable part of DTF 
use structures DIFFIX, DIFVAR, 
DTFSPAN, and DTFUNDEF 


Not used 


CCW 
CCW command code 


address of JOAREA1 


address of IOAREA1 or address 
of IOAREA2 if any 


Not used 


address of DTF extension for 


DTFPH files 


© Copyright IBM Corp. 
-) 
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DTFMT Data Area (Variable Part for Record Format=FIXED) 


Ae es ae tN gee oo Ree er ke ee Pe ae ee oo ah 


| Bytes and 


| 


| Offset |Field Name| Bit Pattern] Description | 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


44 (2C)|DIFFIX 
44 (2C)|  * 


52 |DTFFIOR 
(34) | 


53 (35) |DTFFIOR2 


57 (39)|  * 
| 
72 | DTFFRECS 
(48) | 


77 (4D)| * 

| 
80 (50) |DTFFBLKS 
82 (52)| * 


| 
84 (54) | DTFFREC1 


86 (56) | * 

88 | DIFFWLR 
(58) | 

92 | DIFFERR2 
(5C) | 
96 (60)| * 


104  |DTFFERR3 
(68) | 


40 
8 


4 


1 
16 


4 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


Length variable part 
Not used 


instruction to load/store addr. of 
record from/into users 'IOREG' reg. 


IOREG regs in the leftmost 4 bits 
Not used 


F'RECSIZE' for forward 
F'-RECSIZE' for backward 


Not used 
block size 
Not used 
record size~1 
Not used 


WLRERR specification 
for all input files 


ERROPT specific. for all inp. files 
and not STD labeled output files 


Not used 


ERROPT specification 
for STD labeled output files 
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DTFMT Data Area (Variable Part for Record Format=VARIABLE) 


Pope Gy ee Oe OE IST, ts het Ma oe ee ee ee ge ae ae 
| Bytes and | : | 
| Offset |Field Name| Bit Pattern| Description 


| 44 (2C)|DTFVAR | 4c | Length of variable part | 
| 44 (2CO|DTFVRBLD | 4 | Instruction to load the length of 

| | | | the remaining space in the output | 
| \ | | area into the users VARBLD register| 
| | | | | 
| 45 (2D)|DTFVRBL2 | 1 | VARBLD regs in the leftmost 4 bits | 
| | | | 
| 48 (30), * | 4 | Not used 
| | | | | 
i 52 |DTFViorR | 4 | instruction to store the address of| 
| (34) | | | record into the users 'IOREG" regs. | 
| | | | | 
| 53 (35)|DTFVIOR2 | 1 | IOREG regs in the leftmost 4 bits | 
| | | | | 
| 56 (38)] * | 12 | Not used | 
| | | | | 
| | | | 
| 68 (44)|DTFVBLKS | 4 | block size | 
| | | | 
| 72 (48)] * | 12 | Not used | 
| | | | 
| 84 (54)|DTFVRBEG | 4 | address of next record | 
[ | | | 
| 88 (58)| 7 {| 4 | Not used | 
dee ie ee es 


DTFMT Data Area (Variable Part for Record Format=VARIABLE) (cont...) 


i ‘ 1 
| | | Bytes and | 
| Offset |Field Name| Bit Pattern| Description 


(74) | for STD labeled output files 
Ca 


| 92 |DTFVERR1 | 4 | ERROPT specification for not | 
i osc) | { | STD labeled output files | 
| | | | (Version 3 downward) | 
| 96 (60)| * | 4 | Not used | 
| | | | 
{| 100 |DTFVWLR | 4 | WLRERR specification for all | 
| (64) | | | input files | 
\ | \ | | 
| 104  |DTFVERR3 | 4 | ERROPT specification for not STD | 
| (68) | | | labeled output files (Version 3 on-| 
| | | | wards) and for all input files | 
{108 (6C) | * | 8 | Not used | 
| | | | 
{| 116 |DTFVERR4 | 4 | ERROPT specification { 
| | | | 


Numbers in parantheses are displacements in hexadecimal notation. 
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DTFMT Data Area (Variable Part for 


© Copyright IBM Corp. 1985 


Record Format=SPANNED) 


— eras | = cae | 
| | Bytes and | | 
| Offset |Field Name| Bit Pattern| Description | 
I —t | 
| 44 (2C)|DTFSPAN | 4C | Length of variable part | 
| | | | | 
| 44 (2C)| * | 8 | Not used | 
| | | | 
| 52 |DTFSRECS | 4 | Instruction to load/store the | 
| (34) | | recordsize from/into users | 
| | | | 'RECSIZE' register (output/input) | 
| | | | 
DTFSRECO | 1 | not used | 
| | | | op-code of instr | 
| | | | 
| 53 |DTFSREC2 | 1 RECSIZE register in the leftmost | 
| (35) | 4 bits | 
| | | | 
| 54 (36)| * | 2 Not used 

| 56 (38) % 12 | Not used 

| | | | 
| 68 (44)|DTFSBLKS | 4 | block size 

| | 

| 72 (48) * | 12 | Not used | 
| | 

| 84 (54)|DTFSRBEG | 4 | address of next record 

| | | | 
| 88 (58) * | 4 | Not used 

| | | | 
| 92 |DTFSERR1 | 4 | ERROPT specification for not STD | 
| (3c) | | labeled output files 

| | | | (Version 3 downward) | 
| 96 (60)| ¥ li Wa | Not used 

| | | | | 
| 100 |DTFSWLR | 4 | WLRERR specification for all | 
[ (64) | | | input files 

| | | | | 
| 104 |DTFSERR3 | 4 | ERROPT specification for not STD | 
| (68) | | | labeled output files(Version 3 

| | | | onwards) and for all input files | 
}108 (6C)| * | 8 | Not used 

| | | | | 
| 116 |DTFSERR4 | 4 | ERROPT specification 

| (74) | | | for STD labeled output files | 
t ae ae H roe 4 
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DTFMT Data Area (Variable Part for Record Format=UNDEFINED) 
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ae T T T Se 
| Bytes and | 
| Offset |Field Name| Bit Pattern] Description 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
ie 


files 


——- 
44 (2C)|DTFUNDEF | 3C | Length of variable part 
44 (2C)| * | 4 | Not used 
48 (30) | * | 4 | Not used 
| | 
49 (31)|DTFURECI | 1 | RECSIZE register in the 
50 (32) ¥ | 2 not used| instruction to store address of 
52 (34)|DTFUIOR | 4 | record into the users 'IOREG' 
| | | register (input) 
| | 
53 (35)|DTFUIOR2 | 1 | IOREG reg. in the leftmost 4 bits 
| | 
54 (36) | * | 2 | Not used 
56 (38)| * { 20 | Not used 
| | 
76 (4C)|DTFUBLKS | 2 | block size 
| | 
78 (4E)| * | 3 | Not used 
| | 
81 |DTFURECO | 1 | RECSIZE register in the rightmost 
(51) | | | 4 bits. (for output) 
| | | 
82 (52)| * | 2 | Not used 
| | 
84 |DTFUERR1 | 4 | ERROPT specification for not STD 
(54) | | | labeled output and all input files 
| | | 
88 (58){|DTFUWLR | 4 | WLRERR specific. for all inp. 
| | 
92 (5C)| * | 8 | Not used 
| | 
100 {|DTFUERR3 | 4 | ERROPT specification for STD 
(64) | | labeled output files 
i | 


Numbers in parantheses are displacements in hexadecimal notation. 
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X 
Bae 


Lo 


— 
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DTFMT Data Area (Variable Part for Workfiles) 


os ae le a ee ee oe a ee ee a eg 
| | | Bytes and | | 
| Offset [Field Name] Bit Pattern| Description | 


ao 


| 16 (10)|DTFWRKF | 24 | Length of variable part | 
| |DTFWFLG1 | 1 | Flag byte 1 | 
| 17 (11)] * [| 4 | Not used | 
| | | | 
| 21 [DTFWFLG2 | 1 | Flag byte 2 

| (15) |DTFWNREW | X'80' | 1=no rewind | 
| | DTFWRUN | x'40' | 1l=rewind unload | 
| |DTFWWRK | x'20' | 1=work file | 
| |DTFWBWD | X'10' | 1=backward | 
| |DITFWWRT | X'08' | l=write (output file) | 
| | | | | 
| 22 (11)] * ; 2 | Not used | 
| | | | | 
| 24 (18)|DTFWRECL | 2 | record length | 
| | | | | 
| 26 (1A)|DTFWBLKS | 2 | maximum blocksize | 
| | | | 
| 28 (1C)| * | 4 | Not used | 
| | | | 
| 29 (1D)|DTFWEOF | 3 | address of users EOF routine | 
| | | | 
| 32 |DTFWwCCW | 8 | ccw | 
| (20) |DTFwCCcwc | 1 | CCW command code | 


DF a ee ee} 
Numbers in parantheses are displacements in hexadecimal notation. 


DTFMT Data Area (Variable Part for Workfiles) (cont...) 


ee SSS SSS SSS 
| Bytes and | | 
| Offset |Field Name{ Bit Pattern| Description | 


33 (21)|DTFWCCWA 3 CCW data address 
40 (28)] * 4 Not used 
44 | DTFWERR1 4 address of 'ERROPT' routine 


| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| (2C) DTFWERRA | | ERROPT routine specified | 
| | DTFWERRI | x'40' | ERROPT = IGNORE specified 
| DTFWHDR | | 1=header label and EOV info | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
rf 


x'20' 
wanted (STD labeled) 
| DTFWRECF X'10' | record fixed unblocked 
48 (30) |DTFWRL1 2 record length (STD labeled) 
50 ee PERMERS Ti 2 maximum blksize (STD labeled) 
ce Na a 8 ee 


Numbers in parantheses are displacements in hexadecimal notation. 
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DTFMT (DTF Extension) 


| Offset | 


| (Hex) |Field Name| Bit Pattern| Description 


| Bytes and 


© Copyright IBM Corp. 1985 


| 
| 
| 

| 0 |IJJTDTFX | 8A0 | | 

| | DTFXID { 8 | Control block ID 'DTFX' | 

| 8 | DTFCCW | 28 | room for 5 CCW'S 

| {DTFCWCMD | 1 | CCW command code | 

| 9 | DTFCWADD | 3 | data address | 

| c |DTFCWFL1 | 1 | flag byte 

{ ¢ |DTFCwCD | x'80' | 1=data chaining 

| | DTFCWCC | X'40' | 1=command chaining | 

| |DTFCWSLI | X'20' | 1=suppress incorrect length 

| | DFFCWSK | Xx'10' 1=suppress data transfer 

| | | 

| £ |DTFCWCNT {| 2 | CCW count 

| 30 DIFMAIN | 4 | address of Mother DTF 

| 34 | DIFXLEN | 2 | length of DTF Extension Block 

| 36 DTFXOP [ 1 | actual/last operation against DIF 

| 37 DTFTID | o1 | ID of active task 

| 38 |DTFNXDTF | 4 | DIF list pointer 

| 3c DTFODL | 4 | pointer to ODL entry 

| 40 | DTFOAT | 4 | pointer to OAT entry 

| 44 DTFXOPS =| 1 | temp save area for DIFXOP 

| 45 |DTFLIO1 | i | save area for LIOCSCOM byte 1 

| 46 | * | 2 | Not used 

p——_—____1_-_____-___1__ } 

| File Type Specifications 

| = oe as aay ahr oe 

| 48 DIFFLGS | A | indicators 

| 48 DTFFLGi | 1 | indicators and switches 

| DIFXOPEN | x'so' | i=the file is open 

| DIFXSTD | x'4o" | 1=standard labels 

| |DTFXNSTD | x'20' | O=unlabeled tape 

i | | | i=nonstandard labeled tape 

| DIFXBWD | x'10' | 1=backward 

| |DTFXINP = | x'os' | 1=input file 

| |DTFXWRK | X'o4' |  i=work file 

| DTFXASC | x'o2' | 1=ASCII file 

Lens eeweenl Sates | ate ao | 


Numbers in parantheses are displacements in hexadecimal notation. 
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vw DTFMT (DTF Extension) (cont...) 
ff TT T tT ~T 
| Offset | | Bytes and | | 
| . (Hex) [Field Name] Bit Pattern] Description | 
|——_-1 ! = | 
| Record Format Specifications 
-——— meen aie = Vs =| 
| 49 |DTFFLG2 | 1 | indicators and switches | 
; } 49 | DTFXBLK | x'80' | 1=blocked record format 
gp | |DTFXFIX | X'40' | 1=fixed record format | 
| |DTFXVAR | X'20' | 1=variable record format 
|DTFXSPN | X'10' | 1=spanned record format | 
| |DTFXUND | X'08' | l=undefined record format | 
|DTFX2IO | X'04' | 1=2 IOAREAS specified | 
| | DTFXWA | X'02' | 1=WORKAREA=YES specified | 
|DTFXCHK | X'01' | 1=checkpoint records on file | 
b wah I a ee — 
a | Miscellaneous Specifications | 
et }-———-- - 4 
Veet | 4A |DTFFLG3 | 1 | indicators and switches 
od | 4A |DTFFRST | X'80' | 1=first time indicator | 
| j | | initialized by 'OPEN' to 0 | 
| |DTFXCPR | x'20' | 1l=user CCB is translated 
| ‘ |DTFXNOTM | X'10' | 1=TPMARK option not specified | 
| |DTFXULR | X'08' | l=user label routine specified | 
| |DTFCHKP = | X'04' | 1=checkpoint in progress | 
| |DTFEXCP | X'o02' | 1=EXCP initiated | 
| | 
| 4B | DIFFLG4 fed indicators and switches 
| 4B |DTFANSI3_ | X'80' | 1=ANSI level 3 file 
| {DTFxusco | X'40' | 1=ANSI COBOL file | 
| |DTFBFULL | X'20' | 1=block full write it on tape | 
| |DTFRFULL | X'10' | 1l=record full give it the user | 
| |DTFULBL | X'08' | 1=all user labels written | 


| Flags used during 'OPEN' | 
OT ee eT 


| 4c |DIFFLGS | 1 | open flags 1 
| 4¢C |DTF1VOL1 | X'80' | VOL1 record found | 
| |DTFEHDR1 | X'40' | empty HDR1 record found | 
| |DTFFHDR1 | X'20' | HDR1 record on tape | 
| | DTF1TM | X'10’ | first record on tape is a TM | 
| | DTFEOD | X'08' | '/*' read on SYSIN/SYSRDR | 
| {[DTFUNEX | X'04' | overwrite unexpired file | 
| |DTFNEWTP | X'02' | operator has mounted new tape | 
|DTFIGNLB | X'01' | ignore further label processing | 
| | | | 
4D |DTFFLGSA | 1 | open flags 2 
| 4D |DTFINILP | X'80' | 1l=tape was at load point | 
|DTFLTLBL | X'40' | 1=// TLBL record found | 
| |DTFWVOL1 | X'20' | 1=VOL1 label written on tape | 
| DTFLPTM X'10' | 1=tape mark at load point 
|DTFFHDR2 | X'08' | 1=HDR2 record on tape | 
| DTFUNL X'04' | 1=tape is unloaded | 
1 Se ee 
FLAGS USED DURING 'CLOSE' AND 'EOF/EOV' | 
— 
| 4E | DIFFLG6 | 2 | ‘CLOSE’ and 'EOF' flags | 
| 4E | DTFXEOF X'80' | EOF | 
|DTFXEOV | x'40' | EOV | 
| |DTFXEOFQ | x'20' | quick EOF | 
| |DT™XEOVQ | X'10' | quick EOV 
| |DTFXEOVF | X'08' | force EOV | 
| |DTFXEOVS | X'04' | EOQV reached during writing EOF | 
| | DTFWLR | X'02' | wrong length record | 
| | DTFTRU | X'o1' | actual block is truncated | 


a ey ae Se ee Nae ae Caen le NE eae Se ee ee he at a ne ee 
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DTFMT (DTF Extension) (cont...) 


foo sn, et lS ee kal. te ftw eos eS es oo — Fa, es 

| Offset | | Bytes and | 

| (Hex) [Field Name| Bit Pattern| Description 
one eee 


| 
| 
SEE 


| Other Flags used during OPEN/CLOSE/EOF/IOCS 
| 50 |DTFFLG7 | 1 | | 
| 50 |DTFMFIL =| X'80' | multifile volume | 
| |DTFMVOL =| x'40' | multivolume file | 
| |DTFCHDIR | x'20' | FSL/BSL changed read direction | 
| Flags for DEBUG | 
Ss 4 
[| 51 |DTFFLG8 | 1 | flag byte | 
{| 51 |DTFDBG1 | x'80' | reserved | 
| |DTFDBG2 | x'40' | reserved | 
| |DTFDBG3 | X'20' | reserved | 
| |DTFDBG4 =| X'10' | reserved | 
| | DTFDBG5 | X'08' | reserved | 
| |DTFDBG6—s| X'04' | reserved | 
| |DTFDBG7 | X'o2' | reserved | 
| pee | X'01' | reserved | 
| | 
| 52 | * | 2 | Not used | 
pet io ee Te ee ee A 
| 


Interface to User Routines | 


Sg pe las Ey (Gia || 


| 54 |DTFUSRIF | 8 | | 
| 54 |DTFUCODE | 4 | user code in register 0 | 
| 56 |DTFUCOD1 | 2 | 2-bytes code for EOF/EOV | 
| 57 |DTFUCOD2 | 1 | 1-byte code for OPEN/CLOSE | 
| 58 |DTFUPTR | 4 | pointer to data | 
| 5c | DTIFUIF | 8 | interface to user routine | 
| 5C |DTFUADTF | 4 | address of users DTF | 
| 60 |DTFUABLK | 4 | address of block in error | 
| 64 |DTFUROOS | 4 | save area for register 0 | 
| 68 |DTFUROIS | 4 | save area for register 1 | 
| 6C |DTFUR13S | 4 | save area for register 13 | 
| 70 |DTFURISS | 4 | save area for register 15 | 


| CCB'S CCW'S Sense Bytes | 
SSeS Se eee 


| 74 |DTFUIOMD | 4 | users I/O module address | 
| 78 |DTFUXPH | 4 | save area for DTFPH | 
| 7¢ | * [| 4 | reserved | 
| 80 |DTFOCCB | 10 | origin CCB copied from DTF | 
| 90 | DTFXCCB | 10 | CCB copied from DIF used for 

| | | | OPEN/CLOSE/EOV | 
| AO |DTFPccB | 10 | CCB to be used for SYSLST | 
| BO | DTFSNS | 18 | room for 24 sense bytes | 
| 8 |DTFPUBE j| 8 | saved PUB entry for actual tape | 
| | | | unit - use structure PUBADR to | 
| | | | locate data | 
{ DO | DIFPUB | 4 | address of PUB entry | 
| D4 |DTFPUB2 | 4 | address of PUB2 entry | 
| D8 |DTFNTAP | 4 | number of assigned tapes | 
| DC |DTFNTAPA | 4 | number of actual tape | 
| EO | * | 4 | reserved | 


J 


| Addresses and Registers ( User ) | 


| E4 |DTFIOAIX | 4 | address of I/O area 1 | 
| E4 |DTFIOA1A | x'so' | 1= 1/0 area 1 is active | 
| | | | | 
| ES {|DTFIOAR1 | 3 | pointer to IOAREA1 | 
| £E8 |DTFIOA2K | 4 | address of I/O area 2 | 
| E8 |DTFIOA2A | x'80' | 1= 1/0 area 2 is active | 
| | | | 
| E9 |DTFIOAR2 | 3 | pointer to IOAREA2 | 
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vm’ DTFMT (DTF Extension) (cont...) 


fours op es mage ho eae Se Se ge a ee el 
| Offset | | Bytes and | | 
| (Hex) |Field Name| Bit Pattern| Description | 
See ee wie a ene eee es 
| EC |DTFIOREG | 1 | specified register for IOREG=(X) 
| ED |DTFRECSR | 1 | specified register for RECSIZE=(X) | 
| EE |DTFRVRBL | 1 | specified register for VARBLD=(X) 
\ | Fo |DTFAEOF | 4 | address of users EOF routine | 

va | | | address in DTF | 
| F4 |DTFAURTN | 4 | address of error routine to be | 
| | | | invoked | 
| ¥F8 |DTFAERR | 4 | ptr to ERROPT specification | 
| Fe |DTFAWLR | 4 | ptr to WLRERR specification | 
| 100 |DTFERRFL | 1 | flag byte for error routines | 
| 100 |DTFWLRAC | X'80' | WLRERR routine active | 
| |DTFERRAC | X'40' | ERROPT routine active | 
| 101 * | 3 | reserved | 
| 104 |DTFALBRT | 4 | address of users label routine 
| | | address in DTF 
| 108 |DTFCHKAC | 4 | ptr to access check routine | 
/— | pan ee as ——— 
| Physical Block Description | 
> TT — 
| 11¢ |DTFPHYS | 20 | | 
| 11¢ |DTFBBEG | 4 | pointer to active physical block | 
| 120 |DTFBEND | 4 | ptr to last bytetl in actual | 
| | | physical block | 
| 124 |DTFBSIZ | 4 | blocksize as specified in DIF 
| 128 |DTFBLEN | 4 | length of actual physical block | 
| 12¢ |DTFBSPC | 4 | number of unused bytes in | 
| | | actual IOAREA (remaining space) | 
| 130 |DTFBCNT | 4 | number of physical blocks | 
| | | read/written | 
| 134 |DIFBOFF | 4 | length of block header | 
| | | | initialized by 'OPEN' to: | 
| | | | —> 4 if EBCDIC file | 
| | | | —> 4 if ASCII file + LENCHK=YES | 
| | | | —> 0 IF ASCII file + LENCHK=NO | 
| 138 |DTFBREC | 4 | number of records in block | 
+ 
| 


= Eeecersst seca cameron ____—} 
Logical Record Description | 


13¢ | DTFLOG 18 
13¢ | DTIFRBEGW 4 address of record in I/O area 
or workarea 
140 | DTFRBEG 4 for input: pointer to actual 
J | logical record 
ww | for output: address of area where 
| the next record can be build 
144 | DTFRLEN 2 


| 
| 
| 
| 
| 
| 
| 
length of actual logical record | 
| 
in physical block | 
| 
| 
| 
| 
| 
| 


| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| 146 {|DTFRLENB [| 2 | length of actual logical record 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 


148 | DTIFRLENW 2 number of bytes moved from the 
users workarea 
14A | DTFRTYP 2 type of segment (spanned record) 
= 14C | DTFRACT 2 actual record number 
\ 14E | * 2 reserved 
4 150 | DTFRSIZ 4 RECSIZE as specified in DIF 
{1 tt 
| Miscellaneous Variables | 
{| 154 | DTFMISC | 10 | | 
| 158 |DTFRCNT | 4 | residual count 
| 15¢ |DTFNREC | 4 | number of logical records in | 
| | | | physical block | 
| 160 |DTFNACT | 4 | number of actual record | 


a a ae ee Ca OP ee ee 
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DTFMT (DTF Extension) (cont...) a 


Se ee eS ee 
| Offset | | Bytes and | | 
| (Hex) [Field Name| Bit Pattern| Description | 


| // TLBL Card Info | 


| 164 |DTFTLBL | 50 | 
| 164 * | 1 | Not used | 
| 165 | DTFTFNM | 7 | file name | 

16C * I Not used | 
| 16D |DTFTFID | 11 | file ID | 
| 17E |DTFTVSER | 6 | file (volume) serial number | 
| | | | modified in: IJJTOPN.OPSTDO | 
| | | | IJJTOPN.PVOLSER IJJTOPN.HFLESER | 
| 184 {DTFTVSQF | 4 | volume sequence number 
| | | | modified in: IJJTOPN.PVOLSER | 
| |DTFTVSEQ | 4 | volume sequence number | eo 
| | | | modified in: IJJTOPN.HVOLSEQ | f 
| 188 |DTFTFSQF | 4 | £ile sequence number \ 
| |DTFTFSEQ | 4 | file sequence number | “ 
| | | modified in: | 
| | | IJJTOPN.OPSTDO IJJTOPN.HFLESEQ | 
| 18¢ [DTFTGEN | 4 | generation number | 
| 190 ete | 2 | version number | 

192 DTFTCDAT 6 creation date 
| 198 |DTFTEDAT | 6 | expiration date | 
| 195 |DTFTFSEC | 1 file security | 
| 19F |DIFTBCNT [| 6 | block count 
| 1A5 |DTFTSYS | D | system code | 
| 1B3 |DTFTFLG | 1 | flag bits | 
| 183 |DTFTNEW | x'80' | DISP=NEW | 
| |DTFTOLD | x'40' | DISP=OLD | 
| |DTFTMOD | x'20' | DISP=MOD | 


| VOL Label Record Save Area | 


| 1B4 |DTFVOL1 [| 50 | VOL1 record save area | 

| 1B4 |DTFVOLIN | 4 | label identifier | 

| 1B4 |DTFVOLID | 3 | label identifier 'VOL' | 

| 1B7 |DTFVOLNR | 1 | volume label number | 

| 1B8 |DTFVSER | 6 | volume (file) serial number | 

| 1BE |[DTFVSEC | 1 | volume security | 

| 1BF | * | D | reserved | 

| 1cc |DTFVSYs | D | system that created the vol. labels| 

| 1D9 |DTFVOWN | E | volume owner | ee 

| 1E7 | * | 1c | reserved | ( 

| 203 |DTFVANSL | 1 | ANSI label level | a 
—t 


+ 


| HDR Label Record Save Area | 


eS SS SSS SS 

| 204 | DTFHDR1 | 50 | header label record | 

| 204 | DTFH1N | 4 | label identifier 

| 204 |DTFH1ID | 3 | label identifier 'HDR' | 

| 207 |DTFHINR | 1 | file label number | 

| 208 |DTFHFID | 11 | file ID | we 

| 219 |DTFHFSER | 6 | file (volume) serial number | f 

| 21F |DTFHVSQF | 4 | volume sequence number | i 

| 21F |DTFHVSEQ | 4 | volume sequence number | \ 

| 223 |DTFHFSQF | 4 | file sequence number | : 

| 223 |DTFHFSEQ | 4 | file sequence number | 

| 227 |DTFHGENF | 4 | generation number | 

| 227 |DTFHGEN | 4 | generation number 

| 22B |DTFHVERF | 2 | version number | 

| 22B |DTFHVERS | 2 | version number | 

| 22D |DTFHCDAT | 6 | creation date (YYYDDD) | . 

| 233 |DTFHEDAT | 6 | expiration date (YYYDDD) | aa 
| 229 |DTFHSEC | 1 | file security code | a 

| 23A |DTFHBCNT | 6 | block count | xe 

| 240 |DTFHSYS | D | system code | ac 


| ae Pe RECN NEN NCE NRE Cre BO CC A I a A 
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= a TFEMT (DTF Extension) (cont...) 


[ag ti te ie ene eS a ego so ae hy ag rae | 
| Offset | | Bytes and | | 
| (Hex) |Field Name| Bit Pattern] Description | 
— eo ee 4] 
| HDR2 Label Record Save Area | 
ai 
| 254 |DTFHDR2 | 50 | header label record | 
| 254 | DTFH2N {| & | label identifier | 
| 254 |DTFH2ID | 3 | label identifier 'HDR' | 
| 257 |DTFH2NR | 1 | file label number | 
| 258 |DIFHRECF | 1 | record format | 
| | | | 'F'= fixed length | 
| | | | 'D'= variable length | 
| | | | 'S'= spanned | 
| 259 |DTFHBLKS | 5 | blocksize | 
| 25E |DTFHRECS | 5 | record size | 
| 263 * | 23 | reserved 
| 286 |DTFHBOFF | 2 | buffer offset length | 
[J a ies Seer | z= | 
| Message Writer (SIJJGMSG) Interface | 
TT aan Sone ia —| 
| 2A4 |DTFMSGS | 4 | address of message writer save area] 
| 2A8 |DTFMSGRC | 4 | return code from message writer 
| 2AC |DTFMSGSA | 48 | register save area | 
| 2F4 |DTFMNPL | 30 | monitor parameter list | 
| 324 | DTFMPL | 20 | message parameter list | 
| 344 |DTFFILL | 28 | message filler | 


| // TLBL Processing PLIST | 


| 36C | DTFLPL | 15 | label PLIST 


| ITRA Buffer Anchor 


Sy 


| 384 |DTFITRA | 34 | ITRA buffer constants | 
| 384 |DTFITRF1 | x'80' | ITRA buffer allocated | 
| |DTFITRF2 | X'40' | ITRA buffer entries to be done | 
| 385 |DTFITRB | 3 | start address of ITRA buffer 
| 388 | DTFITRL | 4 | address of last possible entry 
| | | in ITRA buffer 
| 38C  |DTFITRLIG | 4 | length of ITRA buffer | 
| 390 |[DTFITRlL | 4 | address of first possible | 
| | | | entry in ITRA buffer 
| 394 |DTFITRN | 4 | address of actual entry 
| 398 | DTFITRX | 20 | at least one ITRA entry if | 
| 398 |DTFITRBL | 4 | pointer to begin of trace for 
| | | | actual request | 
| L _t By | 
| Save Areas | 
| = a es = = 
| 3B8 |DTFUSAVE | 58 | users PP save area | 
| | | | -it-does—not—have-the-same layout | 
| | | than that in the users PP save area] 
| 3B8 |DTFUPGNN | 8 | users program name 
300 * | 4 | Not used | 
| 3C4 |DTFUPSW | 4 | address part of PSW 
3C8 |DTFURGS | 40 | users register from 0-15 | 
| | DITFURO8 24 | users register from 0-8 
| 3EC | DIFUROF 1C | users register from 9-15 
| 408 | DIFMSGNR 4 | last given message number | 
40C |DTF4191 4 reason code when MSG=4191I1 | 
| 410 |DTF13SAV | 28 | register 13 save area | 
438 |DTFESAVE |2D0 register save area for 9 | 
| | | | nested external calls | 
438 | * | 44 Not used | 
| 44C |DTFEREGO | 4 register 0 | 
708 | DTFELVL 4 level of external call | 
708 | * | 3 Not used | 
(a = el ee i a ee eee 
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DTFMT (DTF Extension) (cont...) 


| Offset | 


| | 


(Hex) |Field Name] Bit Pattern| Description | 


| Bytes and 
70B |DTFELVLC | 1 
70C |DTFI4SAV | 38 

| 
744 |DTFCLVL | 4 
744 * | 3 
747 |DTFCLVLC | 1 
748 {[DTFSRVF | 4 

| 
74C |DTFSVCc5O | 4 
754 * | 4 


| Work Areas 


758 
770 
770 
700 
810 


| DTFWORK 

| DTFWORK1 
| DIFIOBUF 
| DTFIOBU2 
| DTFWORK2 


| 
| 
| 50 
| 
| 


| level of call | 
| link register save areas | 
| indexed by DTFCLVL | 
| level of subroutine | 
| Not used | 
| level of subroutine | 
| function indicator for service | 
| module IJJTSRV | 
| reason code for SVC 50 | 
| reserved | 


doubleword bdy for 'CVD' instr 
WORKAREA 1 


| 
| 
| 
| 
| WORKAREA 2 


| ATTENTION: DTFEURTN must be the last variable in DIF Extension ** | 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


| Ee eee Ee LAS core oe. 


8BO 


3C8 
309 
309 


| DIFUREG 
| DTFUREGS 
| * 


| Starting at this point | 
| the DTF extension contains the | 
| executable code to setup the | 
| linkage to the applications | 
| ERROPT/WLRERR routine and to | 
| transfer control to it. These | 
| routines will return here by | 
| using the ERET macro. This | 
| executable code will be moved | 
| into this field by the | 
| transient phase $$BOTSVA | 
| during OPEN processing | 


{—__ 


declaration for 
save area 


—— 
| reserved | 
oo! Lee St oe See a ae ae | 
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DTFMT Open Anchor Table (OAT) 


I a a i 
| Offset | | Bytes and | | 
| (Hex) |Field Name| Bit Pattern| Description | 


| 0 | OAT | 6¢ | | 
| 0 JOATNAME | 4 | Control block name 'OAT' | 
| 4 |OATATOP | 4 | address of IJJTTOP | 
| 8  |OATAOPN | 4 | address of IJJTOPN | 
| oc foaTacts | 4 | address of IJJTCLS | 
| 10 | OATAEOF | 4 | address of IJJTEOF | 
| 14  foaTaLog | 4 | address of IJJTLOG | 
| 18 |OATASRV | 4 | address of IJJTSRV [ 
| 1c JOATAMSG | 4 | address of IJJTMSG | 
| 20  |OATAMScT | 4 | address of $IJJGMSG | 
| 24  |OATAXIT | 4 | address of $IJJTXIT | 
| 28 | * | 4 | reserved | 
| 2c | * | 4 | reserved | 
| 30 | OATODL | 4 | address of first ODL | 
| 34  |OATCOMRG | 4 | address of PP CONREG | 
| 38 |OATFLAG | 1 | Flag byte | 
| 38 | OATSEC | x'80' | system is secured | 
| 39  |oATYyppDD | 6 | todays date (.YYDDD) | 
| 39 | * | 1 | blank in 20th century | 
| 3A | OATYY | 2 | YY 

| 3¢ | OATDDD | 3 | DDD | 
| 3F * 1 | to force boundary | 
| 40 {OATTRTAB | 4 | address of ASCII translate table | 
| 44  |OATSPID | 8 | subpool-ID for GETVIS | 
| 4¢ JOATPBDY | 14 | begin and end of partition | 
| 4C JOATPBEG | 4 | begin of partition | 
| 50 |OATPEND1 | 4 | end of partition | 
| 54 | OATPEND | 4 | end of partition (incl. GETVIS) | 
| 58 JOATRBEG | 4 | begin of real partition | 
| 5C |OATREND | 4 | end of real partition | 
| 60 | OATOPN | 4 | number of open DTIFs in partition | 


DTFMT Open DTF List (ODL) 


bose ee nee se eee ee SS 
| Offset | | Bytes and | | 
| (Hex) |Field Name| Bit Pattern] Description | 


ee en ee ooo 


| o  {opL | 80 | | 
| 0 | ODLNAME | 4 | Control block name (‘ODL ') | 
| 4 | ODLFWD | 4 | pointer to next ODL or 0 | 
| 8 |ODLNOPN | 4 | number of open DTIF's in partition | 
| ¢ JODLNENT | 4 | number of entries in this ODL | 
| 10 |ODLDTF | 70 | 14 entries 
| 80 li 0 | end of ODL | 
L 


| ODLEND 
{ 


DTFMT - ODL Entry 


Foceeg.- ter ate he 2) ee ee 
| Offset | | Bytes and | | 


| (Hex) |Field Name| Bit Pattern] Description | 


i; 0 {ODLENTRY | 8 | STRUCTURE FOR AN ODL ENTRY 

; 0 |ODLDTFP | 4 | POINTER TO DTF 

| 4 |ODLFLAG | 1 | FLAG BITS | 
| |ODLOPEN | x'80' | FILE IS OPENED 

| | ODLEOF | X'40' | FILE IS CLOSED DURING EOF | 
| 5 JODLDTFX | 3 | DTFX POINTER | 
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DTF Type Code 


Peaat Po ee Nr eh I  ge e ee aed 
|DTF Type Code| | 


| 
| (Byte 20) | | | 
lof DIF Table | DIF | Description | 
x'00' |DTFCD | Combined files 
x'02' |DTFCD | Reader and 3881 Optical Mark Reader files 
x'03' |DTFCN | Console 
x'04' |DTFCD | Punch files 
x'05' |DTFCD | Reader files on 2560, 5424/5425 
x'07' |DTFPR | Printer files on 2560 
x'08' |DTFPR | Printer files 
x'o9' |DTFOR | Optical Reader files except 3881 and 3886 files 
x'oa' | DTFOR Optical Reader files (HEADER=YES) 
X'oB' |DTFMR | Magnetic Ink Character Recognition (MICR) and 
| Optical Reader/Sorter files 
x'oc' |DTFDR | 3886 Optical Character Reader files 
x'10' |DIFMT | Unlabeled tape work files 
|DTFCP | Unlabeled tape work files (compiler). (Note 1) 
x‘il' |DIFMT | Nonstandard or unlabeled tape files 
x'12' |DTFMT | Standard labeled, output tape files 
|DTFPH | Standard labeled, output tape files 
(physical I0CS) 
x'13' | DTFMT Standard labeled, input tape files (read backw) 
Standard labeled, input tape files (read forw) 


| | | 
| | | 
| | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| x'14' |DTFMT | | 
| x'is' | DIFMT | Standard labeled tape work files | 

| 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | 
| | | 
| | | 
| | | 
| | { 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 


X'1a' |DTFDU | Diskette Input/Output Unit files 
x'20° |DTFSD | Sequential DASD work files and data files 
|DTFCP | DASD work files (compiler) 
x'21' | DTFPH Sequential DASD files, MOUNTED=SINGLE 
| (physical IOCS) 

x'22' |DTFDA | Direct access files 

x'23' |DTFPH | Direct access files, MOUNTED=ALL (physic. IOCS) 

x'24' |DTFIS | Indexed sequential, LOAD file 

x'25' |DTFIS | Indexed sequential, ADD file 

x'26' |DTFIS | Indexed sequential, RETRVE file 

x'27' |DTFIS | Indexed sequential, ADDRTR file 

xX'28' | ACB Access Method Control Block for VSE/VSAM 

x'30' |DTFCP | Compiler file for DOS Version 1 (Note 1) 

x'31' |DTFCP | Compiler file for DOS Versions 2 onward 

x'32' |DTFCP | Compiler file for DOS Vers. 2 onward (Note 2) 

x'33' |DTFDI | Device independent system unit files 

x'40' |DTFBT | Basic-Telecommunications Access Method -— Exten-— 

ded Support (BTAM-ES) file (Notes 3 and 4) 

x'6o' — x'67'| 
[ ae eres! pees, (pera es aiceeereor acct | 
Notes: 


1. DTF type is X'30' except for tape or DASD assigned to units SYS000 
to SYSnnn. In this case, the DTFCP open phases change the DIF type 
to X'10' for tape work files, or X'20' for DASD work files. 


2. DIF type is X'32' except for DASD assigned to units SYS000 to SYSnnn. 
In this case, the DTFCP open phases change the DIF type to X'20' for 
DASD work files. 


3. The following control unit codes are ORed into the low-order 4 bits 
of the DIF type code. 


Control Unit Code 


7770 1 
2848 3 
2701 4 
2702 5 
2703 6 


4. The DTF tables for BTAM-ES files are not documented in this manual. 
They are documented in the BTAM-ES publications. 
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7 j'SAM RPS or DAM DASD Device Independent Extension Work Area 


Additional Work Space 
256 bytes for DAM 
128 bytes for ISAM 


[ ] 

| 0 (0) | 

| Channel Program | 

| (Variable Length) | 

| | 

+ S| 

| | 

| | 

| | 

| Work Space | 

| | 

| | 

| | 

| | 

| I ee 

| | 172 (AC) (Except ISAM) 
| | Sector values 

| | (up to 4) | 

b— j-— 4 

| 176 (BO) | 180 (B4) | 

| Address of | Address of original | 

| original channel | logic module | 

| program | | 

== eae | 

184 (B8) | 

| 

| 

72 Byte Register Save Area | 

| 

| 

| 

— 

256 (100) | 

| 

| 

| 

| 

| 

| 

| 

| 

| 

j 
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SUPERVISOR STORAGE ALLOCATION 


Vee § Wie, ww vege ty ee he ie = 2 oe, T ee ad 
iGene— | Macros | Generated Code | Base | 
|ration| Called | | Regs. | 
|Macro | | | Used | 
|SUPVR | | None, this macro only sets globals | - | 
|FOPT | | None, this macro only sets globals | - | 
+ 

IOTAB |SGEND | DSECTS, EQUATES Bee aya 
| = 


[sGLowc | HW/SW interface | 
| | (PSWs, log-out areas, etc.) | 


| | Various constants and tables must be | 
| | below 4K. CRTGEN, PIB tables, exit tables, | 
| | I/O tables, foreground communication | 
| | regions, etc., having Y-type address | 
| | pointers in low storage, must be below 32K. | 

| 


| SMICR | External interrupt handler 
J et 


| | C-transient, B-transient, and | - | 
| | A-transient area | - | 


|SGEFCH | Temporary library control blocks and TFIX | RQ | 
| table for pageable FETCH routines. | | 

|ASYCODE | Asyncronous operator communication | RQ | 
| | routines. | | 
ee eee 

|ASYTAB | Asyncronous operator communication tables | RO | 


| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| [SGATAB | Tables having A-type address pointers in | - | 

| | low storage (CRTSAV, SDAGDT, ISTAVT, | | 

| | | DTSVECTB, SCYVECTB). | 
ee 

| | DISP | Task selection | R6 | 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 


{|SGNUC | Interrupt handler, job accounting | R13 | 
| | in-line routine. | | 


| SGPCK | Program check handler R13 | 
| I + = 
| | (DTSMCIC) ICCF Monitor | R14 | 
| | intercept routine | 
——_—__—___|------_+} 

|SGAFCH | Fetch data section (CCWs, control blocks) R11 | 
|SGDFCH | Fetch overall logic and directory search RO | 
|SGCCWT | CCW translation for 370 mode R8,R9 | 
|SGCCWF | CCW analysis and fixing routine R8,R9 | 
| | for ECPS:VSE mode | 
oo 
| SGSVC | Various SVC routines R13 | 
|SGSVCX | Various SVC routines | R13 | 
|MCRAS | Machine/Channel Check handler, RTA | R15 | 
| 

|SGSTAR | System track algorithm routines | RO | 


a ee a LO nae eae ae a ee a ee ee nl, 
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L a 

i 4 

foe j Supervisor Storage Allocation (cont...) 
Pos 2 ch aro > She == mou te ae Ss ee ee ee 
|Gene— | Macros | Generated Code | Base | 
|ration| Called | | Regs. | 
|Macro | | | Used | 


(SGPOPT) Page in SVCs 

(SGPDATA) Data for page manager 
pan 
| | IPL initialization routines | R7,R9 | 
| | CCW translation copy buffers | | 


| | | | 
| | | | 
| | (SGPLLEV) Load leveler | | 
| | (SGPFIX) Fixing routines | RQ | 
| | | | 
| | | | 


|IOTAB {SGIOS | SVCO (EXCP) and SVC15 (SYSIO) routines | R13 | 
| (cont) | | | | 
: | | (SGSCHED) Channel scheduler routine | R13 | 
J | | | (IOINTER) I/O interrupt handler | RO | 
“age” | | | (SGMIH) Missing interrupt handler | R1i3 | 
| | | (SGDSK) Disk error recovery routine |R13,R14| 
| | | (SGSERI) Service task interface and data | R12 | 
| 
|SGCFCH | Fetch SVC routines | R13 | 
| ee 
| |SGERP | Interface to ERP transients | R13 | 
| 
eof | | SGAP | Asynchronous processing SVC routines {| k13 | 
a \ | i es | 
eg | |SGTINF | Tasking interface routines |R12,R13| 
wa 
| |DTSSVCIC| ICCF SVC intercept routine | R14 | 
| 
|DTSSVCIN| ICCF SVC routine | R14 | 
| 
| | SGRM | Resource management SVC routines | R13 | 
| 
| | | Tasking control blocks | R12 | 
| 
| |SGLOCK | LOCK, UNLOCK routines | R13 | 
| SS ERSece=Sn'a (casas er ScipcigreeesN ORS GF =a a uTG a mance ta TSE. 
| | SGAM | CDLOAD, GETVIS, and FREEVIS routines | R14 | 
| | | (SGAMSUBR) Subroutines of SGAM | R14 | 
| 
| |SGNPGR | Allocate programmer logical units (LUBS) | R13 | 
| ee ee 
| |SGBFCH | Input buffer, program fetch and | RI | 
| | I/0 processing | 
| 
| |SGSER | Automatic Volume Recognition and | R13 | 
| | related SVC routines | | 
| | 
| | | SGSLDUP, SLD update routine, | R14 | 
| | Disk sharing only | | 
| 
| |SGACF | Security and Audit support | R13 | 
| SS SS SS SS See 
fe ch |SGXECB {| Cross partition common SVC routines | R13 | 
—_ | 
| |SGACCT | GETJA SVC routine {| R13 | 
| | Change/Display Priority SVC routines | | 
| 
| | SGINF | Logical SV/PP common SVC routines | R12 | 
| 
| {SGIUCV | IUCV-—VCNA connection | R13 | 
| 
| |SGPREAL | Get/free processor storage for 370 | RO | 
| 
| SGPMR Page manager R9 
(SGPSVC) VIOPOINT service R9 
| R15 
| 
| 
| 
| 
| 
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VSE SUPERVISOR CALL TABLE 


| SVC Code 
| DEC HEX 
6) | 00 
1 | 01 
| 
2 | 02 
3 | 03 
4 | 04 
5 | (0h) 
| 
| 
| 
6 =| 06 
| 
7 | 07 
| 
|. 
8 | 08 
| 
| 
9 | 09 
| 
| 
| 
10 | OA 
11 | OB 
| 
12 | 0c 
| 
| 
13 | OD 
| 
14 | OE 
| 
| 
15 | OF 
| 
16 | 10 
| 
| 
17 | 11 
| 
18 | 12 
| 
| 
19 | 13 
| 
20 | 14 
| 
| 
| 
21 | 15 
| 
22 | 16 
| 
| 
| 
| 
23 | 17 
| 
| 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
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| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
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Imperative 
Macro that 


issues the SVC | specified 


LOAD/SLOAD 
MVCOM 


if issued 
by ERP-Task 
CANCEL 


WAIT 


LBRET 


SETIME 


EOJ 


sysiIo 


STXIT PC 


EXIT PC 


STXIT IT 


EXIT IT 


STXIT OC 


EXIT OC 


| Activation 


| option to be | 


none 
none 


none 


none 
none 
none 


none 


none 


none 


none 


none 


none 


none 


none 


none 


none 


none. 


none 


none 


none 


none 


none 


none 


none 


hone 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
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Function | 


Execute channel program | 
Fetch a phase, | 
except a transient phase | 
Fetch a logical transient] 
phase (S$B..... ) | 
Quisce I/0 | 
Load a phase | 
Modify the partition | 
communication—region | 
Fetch a physical | 
transient (SSA..... ») | 
Cancel a problem program | 
or a task | 
Wait for the posting of | 
a control block | 

(CCB, IORB, ECB, TECB) | 
Transfer control from a_ | 
logical transient toa | 
problem program | 
Return from the problem | 
program to the logical | 
transient which issued | 
the SVC 8 | 
Set interval timer | 
Final return from a | 
logical transient | 
Reset switches in the | 
partition communication | 
region (COMREG) | 
Set switches in the | 
partition communication | 
region (COMREG) | 
Terminate a job and go | 
to job control for end | 
of job step processing | 
Head queue I/O request | 
and execute the channel | 
program | 
Establish/reset linkage | 
to user's PC routine for | 
program check interrupts | 
Return from the user's | 
PC routine | 
Establish/reset linkage | 
to user's IT routine for | 
interval timer interrupts | 
Return from the user's | 
IT routine | 
Establish/reset linkage | 
to user's OC routine in | 
case of attention | 
MSG command | 
Return from the user's | 
OC routine | 
SEIZE or RELEASE the | 
system; enable or disable| 
for external and I/0 | 
interrupts; set the key | 
in a user's PSW | 
Store the LOAD ADDRESS | 
of a phase at a | 
defined user address | 


Cae ee 
ie \ 


A 


a 
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VSE Supervisor Call Table (cont...) 


| SVC Code | Imperative 


| DEC 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


24 


25 


26 
27 


28 


29 


30 


31 


32 


33 


34 


35 


36 


37 


38 


39 


40 


41 


42 


HEX 


26 


27 


28 


29 


2A 


2B 
2c 


2D 
2E 


2F 


30 


31 


Macro that 


EXIT MR 


WAITM 


COMREG 
GETIME 


FREE 


STXIT AB 


ATTACH 


DETACH 


POST 


DEQ 


ENQ 
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| Activation | 
| option to be | 
issues the SVC | specified | 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


none 


none 


none 
none 


MICR=type 


in SUPVR 
none 


none 
none 
none 
none 
none 


TRKHLD=YES 


in FOPT 


TRKHLD=YES 


in FOPT 
none 


none 


none 


none 


none 


none 


hone 
none 


none 
none 


MICR=type 


in SUPVR 


none 


none 
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Supervisor Control Blocks and Areas 


Function | 


Set TIMER INTERVAL and | 
establish accessability | 
to user's TECB | 
Issue an HDV for a | 
telecommunication device | 
or for any device if | 
issued by OLTEP. | 
Validate address limits | 
Issue an HDV for a tele— | 
communication device | 
without dequeveing the | 
CHANQ entry | 
Return from user's | 
stacker select routine | 
Wait for the posting of | 
one of the control blocks| 
specified 

Reserved | 
Reserved | 
Reserved 

Force task selection | 
Provide the time and | 
update 

Hold a track for | 
exclusive use by the | 
requesting task | 
Free a track held by the | 
requesting task | 
Establish/reset linkage | 
to user's AB routine for | 
abnormal termination of | 
a task | 
Initialize a subtask and | 
establish its processing | 
priority 

Terminate a subtask; | 
free resources that might| 
be held by the subtask | 
Indicate occurrence of | 
an event and ready any | 
waiting task | 
Indicate that a pre- | 
viously enqueued resource| 
is available again | 
Prevent two or more tasks| 
from simultaneously | 
manipulating a shared | 
resource (e.g. data area) | 
Reserved | 
Force a unit check record] 
to be written onto the | 
recorder file | 
Reserved | 
Allow OLTEP to run in | 
supervisor state | 
Support the multiple | 
wait macro WAITF for MICR] 
type I/O routines | 
Fetch a CRT-transient | 
phase | 
Allow ACF/VTAM to | 
initiate the execution | 
of a channel program | 
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VSE Supervisor Call Table (cont...) 


| SVC Code | Imperative 
| Macro that 


| DEC 


52 
53 


54 


55 


56 


57 


64 
65 


66 
67 
68 


69 


34 


35 


36 


37 


38 


39 


3A 
3B 


3¢ 


3D 


3E 


3F 


40 
41 


42 


43 


44 


45 


HIPROG 


TTIMER 


CPCLOSE 


GETPRTY 


SETPRTY 


INVPART 
INVPAGE 


GETDADR 


GETVIS 


FREEVIS 
USE 


RELEASE 
CDLOAD 


RUNMODE 
PFIX 
PFREE 


REALAD 


| Activation 


| 


| option to be | 
HEX| issues the SVC | specified 


none 


none 


none 


none 


none 


none 


none 


MODE=VM or 
MODE=370 
in SUPVR 
none 


none 


none 
none 


none 


none 


none 
none 


none 
none 


none 
none 
none 


none 
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| 
| 
| 
| 
| 
| 
| 
| 
| 
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“| 
| 


Function | 


Used by LIOCS to channel | 
user indicating | 
illegal SVC | 
Make directory entry | 
information for a phase | 
available to the | 
requesting task | 
Calculate the highest | 
address of an overlay | 
structure of phases or of | 
one phase only and store | 
it in the COMREG | 
Return the remaining time] 
interval or cancel a time| 
interval | 
Allow ACF/VTAM to | 
schedule a user exit in | 
an application program | 
Release page frames to | 
selection pool (applies | 
only to 370 mode | 
of operation) | 
Allow SDAID to acquire | 
processor storage needed | 
for program initiali-— | 
zation (applies only to | 
370 mode of operation) | 
Support the VSE/POWER-CP | 
interface when VSE | 
operates under VM/370 | 
Return partition | 
priorities to the | 
requesting task | 
Change partition | 
priorities as specified | 
Initialize partition | 
Initialize table or | 
invalidate pages | 
Return the virtual | 
equivalent of a real I/O | 
area plus offset | 
Request allocation of | 
storage within the same | 
partition or within | 
the SVA | 
Free storage requested | 
through a GETVIS macro {| 
Indicate system resource | 
is in USE | 
RELEASE a system resource] 
Load a phase in the | 
requesting partition's | 
GETVIS area unless that | 
phase is already in | 
the SVA | 
Return the system's | 
operating mode | 
FIX pages in processor’ | 
storage | 
FREE pages in processor | 
storage | 
Return the REAL address | 
corresponding to a given | 
virtual address | 
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VSE Supervisor Call Table (cont...) 


| SVC Code | Imperative 


| Activation 
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| 
| 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
‘ 
d| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


| Macro that | option to be | 
| DEC HEX] issues the SVC | specified 
| 70 | 46 | VIRTAD | none 
| | | | 
| | | | 
| 71 | 47 | SETPFA | none 
| | | | 
| | | | 
| 72 | 48 | GETCBUF | none 
| | | | 
| | FREECBUF | none 
| | | | 
| 73 | 49 | SETAPP | none 
| | | | 
| 74 | 4A | PFIXREST | none 
| | | | 
| | | PFIXCHPT | none 
| | | | 
| | | | 
| 75 | 4B | SECTVAL | RPS=YES 
| | | | in FOPT 
| | | | 
| 76 | 4c | | none 
| | | | 
{| 77. | 4D | TRANSCSW | none 
| | | | 370 mode 
| | | | only 
| | | | 
| 78 | 4E | CHAP | none 
| | | | 
| | | | 
| 79 | 4F | | none 
| so |{ 50 | SETT | TTIME=part-i 
| | | | in FOPT 
| 81 | 51 | TESTT | TTIME=part-i 
| | | in FOPT 
| | | | 
| 82 | 52 | | none 
| | | | 
| 83 | 53 | ALLOCATE | none 
| | | | 
| 84 | 54 | SETLIMIT | none 
| 85 | 55 | RELPAG | none 
| | | | 
| 86 | 56 | FCEPGOUT | none 
| | | | 
| 87. | 57 | PAGEIN | none 
| | | | 
| 88 | 58 | TPIN | none 
| 89 | 59 | TPOUT | none 
| 90 | SA | PUTACCT | JA=YES 
| | | | in IPL 
| | | | SYS—CMD 
| | | | 
| 91 | 5B | | JA=YES 
| | | | in IPL 
| | | | SYS~CMD 
| 92 | 5C | XECBTAB | none 
| | | | 
| | | | 
| 93 | 5D | XPOST | none 
| | | | 
| | | | 
| 94 | 5E | XWAIT | none 
| | | | 
Chapter 4. 


Function | 


Return the virtual addr. 
corresponding to a given | 
real address | 
Establish or terminate | 
linkage to a user Page | 
Fault Appendage routine 
GET copy buffer for IDAL 
of tape ERP 

FREE copy buffer for IDAL| 
of tape ERP 

Allow linkage to channel-— 
end appendage routine 

FIX page(s) in processor 
storage for restart 

Build parameter list for 
PFIXREST during 
checkpointing 

Calculate a sector value 
for a disk device with 
the RPS feature 

Initiate recording on VM 
recorder file 

Returns the virtual 
address of an ERP CCW 
address copied from the 
pertinent CSW | 
Change the processing | 
priority of the 
requesting task 
Reserved 

Set task time interval 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
Return remaining task 
time interval or cancel 
the time interval | 
Set monitor call and/or | 
branch, for ICCF | 
Allocate real or virtual | 
partitions | 
Set partition sizes | 
Release the contents of 
one or more pages | 
Force a page-out | 
operation for more pages | 
Request a page~in | 
operation for more pages | 
Start TP balancing | 
Stop TP balancing | 
Provide interface with | 
VSE/POWER for additional | 
user—provided account | 
information | 
Provide interface with 
VSE/POWER for standard | 
account information 
Define, delete, or 
check an entry in the 
cross—partition ECB table 
Set the traffic bit ina 
cross-partition ECB and 
ready any waiting task 
Wait for a cross-parti- | 
tion ECB to be posted | 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
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VSE Supervisor Call Table (cont...) 


| SVC Code | 
| DEC HEX| 
{| 95 [ 5F | 
| | | 
| | | 
{| 96 | 60 | 
| | | 
| 97 | 61 | 
| | | 
| | | 
| | | 
| 98 | 62 | 
| | | 
| | | 
| 99 | 63 | 
| | | 
| | | 
| 100 | 64 | 
| | | 
| | | 
{ 101 | 65 | 
| 

| 102 | 66 | 
| | | 
| | | 
| 103 | 67 | 
| | | 
| | 
| 104 | 68 | 
{| 105 | 69 | 
| | | 
| | | 
{| 106 | 6A | 
| | 
| | | 
| 107 | 6B | 
| | | 
| | | 
| | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| 108 | 6¢ | 
| | 
| | | 
| 109 | 6D | 
{ 110 | 6E | 
| | | 
| | | 
| | | 
| | | 
| 111 | 6F | 


Imperative 
Macro that 


| 
| 


Activation | 
option to be | 


issues the SVC | specified | 


EXTRACT 
MODCTB 
GETVCE 
PFIX 
PFREE 


MODVCE 


GETJA 


EXTENT 


SUBSID 


DEVUSE 
GETFLD 
MODFLD 
RLOCK 
SENTER 
SLEAVE 
TREADY 
TSTOP 
VIO POINT 


SECHECK 


PAGESTAT 


LOCK/UNLOCK 


TTIME=part—id 
in FOPT 
TTIME=part—id 
in FOPT 


none 


none 
none 


none 
(CECPS: VSE 
mode only) 
none 


JA=YES 
in IPL 


SYS—CMD 
none 


hone 


none 
none 


none 


SEC=nn 
in IPL 
SYS—CMD 
none 


none 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
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Function | 


Return from a user's 
abnormal termination 
routine 

Return from a user's task 
timer exit routine 
Establish/reset linkage 
of user task's timer exit 
routine for task time 
interval end 

Extract system control 
information 

Modify a PUB2 table entry 
Return a specific volume 
characteristics and/or 
track balance information 
Fix or free a page in 

the SYSTEM GETVIS area 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
Update the volume | 
characteristics table | 
Update the fields in the | 
requesting partition's | 
job accounting table | 
Execute I/O operations | 
for SYSFIL on FBA device, | 
if FBA supported | 
Add, return, or delete | 
Disk extent information | 
Accept, return, and | 
delete subsystem identi- | 
fication information | 
Set the storage key for | 
a specific area to the | 
value in Reg. 0 (ICCF) | 
Release a device that | 
was ‘in use' | 
Force a device to be set | 
‘in use' | 
Retrieve task related | 
information | 
Modify task related | 
information | 
Obtain access to a | 
specified resource or | 
wait for it | 
Enter a subsystem | 
Leave a subsystem | 
Post or cancel a task | 
Deactivate current task | 
or partition | 
Point to VIO control | 
block (VIORB) | 
Check user's authority | 
for accessing the | 
specified resource | 
Return status of a page | 
or a set of pages | 
Protect or release a | 
serially re-usable | 
resource against | 
concurrent access of | 
two or more tasks | 
Reserved | 


a 
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VSE Supervisor Call Table (cont...) 


© Copyright IBM Corp. 1985 


(yet, cee ee ge pe ee ee Se oe ee ee AS) Sa 
| Activation | | 


| option to be | | 


| SVC Code | Imperative 
| Macro that 
HEX| issues the SVC | specified | 


| 
| 


DEC 


117 
118 


140 
141 


142 


75 
76 


8C 
8D 


8E 


VSIUCV 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


none | Build, return, or delete | 
| stored assignment | 

| information | 

none | Cross—partition | 
| communication services | 

none | Allocate, deallocate or | 
| extent VIO file | 

none | Software initiated | 
| power-off for 4361 | 

none | Allocate or reallocate | 
| programmer LUB's | 

none | Reserved | 
MODE=VM or | CP command interface | 
MODE=370 | (CPCOM macro) | 
in SUPVR | | 
| | 

| | 

‘ | | 
. iaz | 
none | Reserved | 
MODE=VM | Provide subsystem support | 
in FOPT | for VM/VCNA (VTAM | 
| Communication Network | 

| Application) | 

none | Reserved | 
| | 

| | 

| | 

; hi oa | 
none | Reserved | 
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CANCEL CODE TO MESSAGE CODE CROSS REFERENCE 


| Cancel | Message | Descriptive Part of Message (or Condition) 
| Code 


Code 


In all cases default value except those listed 
Cancel request from subsystem 

Cancel request from LIOCS 

Processing error in access control 

Access ‘control violation 

Execution failure in ICCF interactive partition 
Program check in subsystem or appendage 
Page fault in subsystem or appendage 
Invalid 'Read from/or write to' system file 
on FBA device 

Normal EOJ 

No channel program translation for unsupported 
device 

Insufficient buffer space for channel program 
translation 

Reserved 

Page pool too small 

Page fault in disabled program 

Error in privately translated CCW 

Program request (Same as 23 but causes dump 
because subtasks were attached when maintask 
issued CANCEL macro) 

Eliminates cancel message when task issues 
DUMP macro with subtasks attached 

I/O operator option 

I/O Error 

Channel failure 

CANCEL ALL macro 

Maintask termination 

I/O, error on lock file 

CPU failure 

Program check 

Illegal SVC 

Phase not found 

Program request 

Operator intervention (cancel) 

Invalid address 

SYSxxx not assigned (unassigned LUB code) 
Undefined logical unit 

(invalid LUB code in CCB) 

Phase too long 

(does not fit in LTA or partition) 

Invalid Sub-library structure 

I/O error on page data set 

I/O error during fetch from private core image 
library 

Illegal parameter passed by PHO routine 
Failing storage block 

(program cannot be executed) 

Invalid resource request (possible deadlock) 
More than 255 PFIX requests for 1 page 
Reading past /& statement (on SYSRDR or SYSIPT) 
Reserved 

Invalid DASD address 

Invalid first CCW 

GETVIS space exhausted 

Job control open failure 

Program check or page fault in I/0 appendage 
routine 

Reserved 

Wrong privately translated CCW 

Invalid CCW chain for SYSLOG 

Spool request out of sequence 
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Cancel Code to Message Code Cross Reference (cont...) 


(Nae tae cle ee a whee go So Oe 
Cancel | Message | Descriptive Part of Message (or Condition) 
C 


| 
ode | Code | | 
—— + ! 
| x’40" | oVvga5si | ACF/VTAM error (termination of task) | 
| 41 | OV96I | ACF/VTAM error (invalid condition code) | 
| 42 | OP861 | Violated DASD file protection | 
| FF | | Multiple cancel condition | 
| | | (see SYSLST for details) 
{ XX | OP78I | Unrecognized cancel code | 
| | OP83A **| Supervisor catalog failure | 
| | OP87A **| IPL failure | 


* If the CCB/IORB is unavailable, the logical unit is SYSxxx. 
w* This cancel code is not significant in case of a supervisor 
catalog or IPL failure, because the system is placed in a 


WAIT state without any further processing by the terminator. 


XX Any other DIGITS 


Chapter 4. Supervisor Control Blocks and Areas 


4-11 


Licensed Material - Property of IBM © Copyright IBM Corp. 1985 
SAVE AREAS 


The addresses of the various save areas allocated by the system can be found in 
the appropriate TCB table. 


The LTA save area can be identified via -eye catcher- 'CNCLINFO in the 
supervisor or via TIBATAB -64. 


If TIBFLAG=LTAACT and TERMACT, the LTA save area will be found in SAVARPTR, and 
the PP save area pointer in SAVARPT2. 


Layout of Problem Program (PP) and LTA Save Area 


fe pee ee ee gee Seg re ee COL peg fee ee ol 


| Program Name (Logical Transient Name) | 
| 0 (0) 7 (7) | 
Ba 

Program Status Information ( — Return PSW — ) | 
| 8(8) | 9(9) {| 10(A) | 11(B) 12(C) | 13(D) 15(F) | 
ee ee a 
| x'40' PER | Protection | (Note 1) | Zero | Instruction | 
| X'04' DAT | Key and | H | Address | 
| x'02' I/O | Mask (CMWP) | | | | 
| x'o1' EXT | Bits | | | | 


ens esr tl. 
| 16 (10) General Register save area (Reg. 9 through Reg. 8) 79 (4F) | 
- 


| 80 (50) Reserved 81 (51)|82 (52) (Note 2) (Note 3) 87 (57) | 
Se 


| 88 (58) Floating Point Reg. save a. (Reg. 0 through 6) 119 (77) | 
NR 0 er NE RY AE ON Ss RAE CATT AE SSR SER SP LO a EU ee Ire EE RE ee eT ea | 
Notes: 
1. Byte 10 
. bits 0-1 = Reserved (zero) 
° bits 2-3 = Condition Code 
. bits 4-7 = Program Mask 


2. Bytes 82 - 87 (PP Save Area) 
° main task: Date of job begin 


° subtask: 82 (52) - 83 (53) : Reserved 
° 84 (54) - 85 (55) : Task id 
° 86 (56) : Key of ICCF pseudo-partition 


° 87 (57) : Reserved 
3. Bytes 82 - 87 (LTA Save Area) 
° Reserved 


Layout of User-Exit-Save Area (STXIT) 


Se ee De Pe ee ee ee we ee pe Be Ae oe ne ee po 
Interrupt Status Information 


| 
| 0(0) | 1(1) | 2(2) 3(3) | 4(4) | S65}. 707) 4 
See See ee ee 
| | Protection | | | Instruction | 
| Reserved | Key and Mask | Interruption | (Note 1) | Address | 
| | bits from | Code | | | 
| | PSW byte 1 | | | | 
| 8 (8) General Register save area (Reg. 0 through 15) 71 (47) | 
Typos oa ip a eo ip np A i ag a ele Ie 
Note: 
1. Byte 4 
. bits 0-1 Instruction Length Code 


° bits 2-3 = Condition Code 
. bits 4-7 = Program Mask 


The address of the save area specified by the user in the STXIT macro parameter 
is stored in the appropriate table (TCB, PCB or TITAB). 
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TASK AND PARTITION KEY DEFINITIONS 


Storage Protection Key 


Each partition in VSE is assigned a unique storage protection key. It's the 
hexadecimal representation of the value 16*n, where 
0 <= n <= number of partitions. 


Storage protection keys are assigned depending on the number of partitions 
according to the following scheme: 


| PIK Value in COMREG | 
a - 
| Part.| Part. | Number of Partitions | 
| 


| id | name | 12 | 12 |] 10/9 | 8 | 7 |6 {5 | 4 [ 3 | 2 


| oo | sys | 00 | 00 {| 00 | 00 | 00 { OO | 0O | OO | OO | OO {| OO | 
[+--+ —}- +++ ++ +++ 


~ { o1 {| BG | 10 | 10 }| 10 | 10 | 10 | 10 | 10 | 10 | 10 |] 10 | 10 | 
ra \ 
" ad {| oc | Fi [co | Bo { Ao | 90 | 80 |] 70 {| 60 | 50 | 40 | 30 | 20 | 
od [hn a af 
{| OB | ¥F2 | BO | Ao | 90 | 80 | 70 | 60 | 50 | 40 | 30 | 20 | 
[——+- 
| oA | ¥F3 | AO | 90 | 80 {| 70 | 60 | 50 | 40 | 30 | 20 | 


a eae 


| 09 F&4 | 90 | 80 | 70 | 60 | 50 | 40 | 30 | 20 | 
[+++ —+— +—+—— 
| o8 | ¥F5 | 80 | 70 | 60 | 50 | 40 | 30 | 20 | 

| o7 | Fé | 70 | 60 | 50 | 40 | 30 | 20 | 

| 06 | F7 | 60 | 50 {| 40 j 30 { 20 | 

| o5 | ¥F8 | 50 [| 40 | 30 | 20 { 

| 04 | F9 | 40 | 30 | 20 | 


| o3 | FA | 30 [ 20 | 
SS 


| o2 | FB | 20 | 
| Se, eee aera Oram 
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PARTITION IDENTIFICATION 


Normally a partition is identified by its unique storage protection key. Due to 
its additional use, a special storage protection key value is often called a 
"Partition Identification Key’ (PIK). In some cases a partition is identified by 
a ‘Partition Identifier’ (PID) value, which is just the value PIK/16. 


Note: The PID values are contained in the first digit of a storage protection 
key. 

Task Identification 

Tasks are identified by hexadecimal numbers 1 to X'FF'. The following table 


shows the task identifier (TID) values and their assignments to particular 
tasks: 


| System Task | Main { Sub | 
| | Task | Task | 
| TID | TID | TID | 
;_ 
{ OO | Unused | 20 | AR {| 30 | #* | 
; 01 | SNS - CCH/MCAR task to issue {| 21 | BG J} 31 | ** | 
| | SENSE command | 22 | F1* | 32 | ** | 
{| 02 | DSK - resident disk error } 23 | F2* | 33 | ** | 
| | recovery task | 24 | F3* | 34 | ** | 
{| 03 | RAS - CCH/MCAR maintask | 25 | Fa* |{ 35 | ¥ | 
| 04 | PMR - page manager task | 26 | FS % Ly Cah 

| 05 | Unused | 27 | Fé * | nn | ** | 
| 06 | PGN - page in task | 28 | F7 * | | | 
| o7 | SUP - fetch task | 29 | Fa* | | | 
| 08 | DIR - directory read task | 24 | Fo * | | | 
{| 09 {| CRT - display operator console | 2B | FA* | | | 
| | support task | 2c | FB* | | | 
| OA | ASY - asynchronous operator | 2D | Unused | | | 
| | communication support task | 2E | Unused | | | 
| OB | ERP - error recovery task | 2F | Unused | | | 
| oc | LcK - lock service task | | | | | 
{| OD | Unused | | | | | 
| OE | LOG - logger task | | | | | 
| OF | SVT - automatic volume recognition| | | | | 
| | task | | | | | 
| 10 | Unused | | | | | 
ff ete | | | | | 
| 1F | Unused | | | | | 
| 20 | AR - attention routine task | | | | | 
eerie Saf ee 
* Depending on the number of partitions, all or some of these identifiers may 


be unused (in descending order of values). 


** A pool of subtasks is created and maintained by the supervisor, The size 
of this pool is given by the maximum number of subtasks active at the same 
time. 


“ fae 
fo : 
f 
i 


ac 


LO 


“ 
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Stored Assignment Table (SAT) 


>| | 
ie: a 
| SSS ee 
i = index to first | | | 
programmer unit | ann 
m = number of units | 0 15 
n = number of partitions—1 | 
| | 
NICL FICL | LUBTAB LUBTAB | Extension 
System | m | |} 0 -et—>| | L—>| | | | | 
BG {| m | | i | ihe sa | | | | 
b+ RH FH [++] 
Fn | m | [| Et I 4] | | 
4+ Ra -H4 K++ 
r+ ky OH +++ 
F2 | m | i: sam | [=f a | | 
ee ++ 1 
F1 | m | ieee oa | | | | | | 
LL [+--+ 
SSS SS | | l| =a 
| = ay Saeceeoey cae aeneaee ee | 
| | | ce i | | | 
}—_________, ea ee a ry 
| | 0 1 01 3-4 Ff | 
| PUBOWNER | PUBTAB | 
| ls py 
| | | | | | | VV Extent Information Area 
| f | | | | | | | 
| i}. SSS eee ee 
Lo} ff Lol | . 
| | 
e ° e e e e a ee 
}--[L._ }—_——_—_| (e) 15 
f | | | | 
0 1 (see next page) 


Chapter 4. 


Supervisor Control Blocks and Areas 


4-15 


Licensed Material - Property of IBM 


© Copyright IBM Corp. 1985 


| | 
| | ct 
| | | | | | | CHNADR 
| INTTAB1 | INTTAB2 L_}_{___J 
ee ees | [| p—-9 | 
oe | | Stee “at Vv _sINTTAB3 
| | | { | an es a | 
oe i = 
tf {| | 1) ree eee ae’? il) hh ee | 2) 
| eS | — a Se Re Eee 
| e e | e e 
| e e | ° ° | | | j oo0e | 
ae os oe aoe, 
= Ls} ps} | ||] eee | 
L—| | — Lops 
ae a ee o | 15 
| | 
| | 
SSS SS SS Se 
| | 
| | PUBTAB 
a eS EE | 
| | | ae eal THTAB (Optional) 
ae 
{ | | used by PIOCS 
LUBTAB | re 
7. | 
SSS eet 
e e 
+ 
io] TY | | 
tf 
9] 7 : 8 
CHANQ (Entry length 32 bytes) 
[oS Fo ee oe ee ee ye 
is | 


| FLPTR #—>| 
[ Seceeeeeern ers | 
0 


1) Initialized by IPL. 
2) Optionally allocated and initialized by IPL. 
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Logical Unit Block Entry (Note 1): 


| Bytes | | 
| Dec Hex | Description | 


ap on 


| 0 0 | PUB index of device assigned to this logical unit | 
| | X'FF' if no PUB is assigned or | 
| | X'FE' if I/O is to be ignored for this log. unit | 
| 1 1 | Reserved | 


SS SS SS ee ere | 


Logical Unit Block Table (LUBTAB) 


(Note 2) 
—— pont} b-+—4 
SYSRDR 0| | | SYSSLB 10] | i SYSLIB 1E| | | 
_—— -—_+}+—+ (Note 3) j}__{—__ 
SYSIPT 2] | | SYSRLB 12] | | * 8 6 
SYSPCH 4| | | SYSUSE 14] | | (Note 4) * °° @ 
/—++— b+ b+ 
SYSLST 6] | | SYSREC 16| | | SYSO01 | | | 
—+—~ bate b+ 
SYSLOG 8| | | SYSCLB 18] | | SYS002 | | | 
b+ | I+ ; t+ + 
SYSINK Al | | SYSDMP 1A] | | ° e ee 
= a cee : = 
SYSRES cil | | SYSCAT 1c| | | SYSnnn | J | 
bt +—}—| Li 
Notes: 
1. Null entries X'FFFF' are generated at supervisor generation time. 
2. There are 14 externally known system LUBs and one internally used for label 
access method. 
3. System LUBs used by dynamic assignments. 
4. The total number of system LUBs is a constant. 


LUBTAB Extension Table 


| Bytes | | | 
| Dec Hex | Label | Description | 
pt rv | 
0 o | LUBXFLG | Flag Byte | 
| LUBXPA | X'80’ Perm. altern. assignment stored| 
| LUBXTA | 40 Temp. altern. assignment stored] 
| LUBXPE | 20 Permanent assignment stored | 

| | 


10 -01 Reserved | 
1-3 1-3 | LUBXADR | Pointer to first Stored Assignment {| 
| | Table entry (SAT) 


| 

| 

| 

| 

| 

| | | (LUBXPA and/or LUBXTA is on) | 
| 

| 

| 

| | (LUBXPA and LUBXTA both off) | 
| 

| 


1 1 | | Reserved | 

2-3 2-3. | LUBXPER | Stored permanent assignment | 

beh etar eek Anavetveceiad Seiivs badnwtarace wu doe ba we edad arta cece aber oun diac tiecah gy eR annul eaeoacee { 
pon 
| OPTIONAL | LUBXEPT | Pointer to first EXTENT INFORMATION | 
| DASDFP=YES | | chain entry or zero if no EXTENT | 
| 4-7 ris aa | INFORMATION available l 


The start address of the LUB Extension table is stored by IPL in bytes 168-171 
(X'A8-AB') of the Partition Communication Region. 
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Stored Assignment Table Entry (SAT) 


| Bytes Iv 4 | | 
Dec Hex | Label | Description | 
ee a ee on 
| 0 ) | SATFLG | Flag byte | 
| | | x'80' Reserved | 
| | {| 40 Reserved | 
| | SATPE | 20 Permanent Assignment saved 
| | | in this entry | 
| | | 10 Reserved | 
| | {| 08 Reserved | 
| | | 04 Reserved | 
| | | 02 Reserved | 
| | | O1 Reserved | 
{| 1+3 1-3 | SATNEXT | Pointer to next assign entry in the | 
| | | chain | 
| 4 4 | SATEOCH | Offset within SATSAV of next free | 
| | | entry | 
| 5 5 | SATEOPCH | Offset within SATSAV of saved | 
| | | permanent assignment | 
| 6-7 6-7 | SATSAV | Space for saving permanent | 
| | | assignment (max. of 5) | 
| eee eee | | | 
| 14-15 E-F | | | 
I or et Z 


The address of the Stored Assignment Table Entry (SAT) can be found in LUBTAB 
Extension Byte 1. 


Extent Information Entry 


The LUB extension table entry contains a pointer (4-7) to a chain of Extent 
entries for DASD File Protection. 


{=< ast ae a I pe ee 


| Bytes | | | 
| Dec Hex | Label | Description | 
J 
0 0 EXBFLG Flag Byte 
EXBREAD X'80' Allow READ access only 
(no multi-track operation) 
EXBSHORT 40 Extent information is CC only 


| | | 

| | | 

| | | 

| | | 

| | | 20 Reserved 

| | | 10 Reserved 

| | | 08 Reserved 

| | | 04 Reserved 

| | | 02 Reserved 

| | | 01 Reserved 

| 1-3 1-3 | EXBNXT | Pointer to next Extent entry in the 
| | | chain or zero if this is the last 
| | | Extent entry 

| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 


en es es a ee ee ran cee mame me St Ht He 


4-7 4-7 EXBHI High Extent Limit 
CKD Device Cylindert+Head No. 
FBA Device Physical Block No. 
. 8-il 8-B EXBLOW Low Extent Limit 
CKD Device Cylindert+Head No. 
FBA Device Physical Block No. 
12-13 C-D EXBCOUNT Usage count for this extent 
14-15 E-F Reserved 


A a a ee 
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Command Control Block (CCB) 


Equipment Check, 

2560, 3203, 5424/5425 

Data/equipment check, 

3505 or 3525 Permanent Error, (Note 7) 
TAPE Read Data check, 

DASD Data Check, 

PRT1 Print Check/Data Check, 

Diskette Data Check. 


| |Trans— | | Type |Used by| | 
| |mission|CSW {Code and|LIOcs | [Used by |CCW |Optional} 
|Count|Infor— |Status|Logical |or 3895|CCW |Physical|Address|Sense 
| |mation [Bits {Unit |Procs |Addr.|Iocs jin CSW |CCW | 
lo 1/2 314 516 7| 8 {9 11] 12 [13 15/16 23| 
|Byte(s) | Description | 
[0-1 RESIDUAL | Number of bytes that have not been processed | 
| COUNT | by the channel 
| | BTAM (370 mode only}: Number of needed copy blocks | 
} 2-3 lByte 2 |set on| 
| TRANSMITTING | | by | 
f INFORMATION ==> 
| between |Bit 0: Traffic Bit (WAIT). (Note 5) |PIOCS | 
| PIOCS and {Bit 1: End-of-File, (Note 2) |PIOCS | 
| PROBLEM | PRT1—UCSB Parity Check. | | 
| PROGRAM |Bit 2: Irrecoverable I/O error was | | 
| | encountered. |PIocs | 
| (Pr.Pr.) |Bit 3: Prevent Cancelation on Irrecoverable | | 
| | I/O error. |Pr.Pr. | 
| |Bit 4: Return DASD and/or DISKETTE |Pr.Pr. | 
| | Data Checks, } | 
| | Return 5424/5425 not ready, | | 
| Indicate action-type messages for DOC. | | 
| [Bit 5: Post at Device End. (Note 5) |Pr.Pr.| 
| |Bit 6: Return TAPE or DASD | | 
| | Read Data Check, (Note 3) |Pr.Pr.| 
| | Return 2560 Data Check, | | 
| | Return 2520, 2540, 2560, 3881, | | 
| | or 5424/5425 Equipment check, | | 
| Return 3505, or 3525 | | 
| Permanent error, (Note 7) | | 
} | Return 3203 or PRT1 errors, | | 
| | Return 3895 errors. (Note 9) | | 
| |Bit 7: User handles I/O errors. . (Note 8) |Pr.Pr.| 
| Se es 
| |Byte 3 |set on| 
| | | by | 
re art 
| |Bit 0: DASD Data Check in Count Area, |PIocs | 
| | 3330, 3340 or 3350 permanent error, | | 
| | 1287/1288 Data Check, | | 
| | 1419D SCU Not Operational, | 
| | 3203 or PRT1 print | | 
i | check/equipment check, | | 
| | 3540 Special Record transferred. | | 
| |Bit 1: DASD Track Overrun, |PIocs | 
| | 1419 Intervention required, | | 
| | 1287 Keyboard Correction in | | 
| | Journal Tape Mode, | | 
j | PRT1 Print Quality/Equipment check | | 
| |Bit 2: DASD End-of-—Cylinder, | | 
| | 1419, 1287 ,1288 Hopper Empty (Note 4)] | 
| | PRT1/2245 Line position error.(Note 6)| | 
| {Bit 3: 1287, 2520, 2540 or 3881 Equipment }PIocs | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | 
| | | | 


Note: Pr.Pr. stands for Problem Program 
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Command Control Block (CCB) (cont...) 


| |Trans— | |Type [Used by| | | | | 
| [mission|CSW |Code and|LIocs | |Used by |CCW | Optional | 
|Count|Infor— |Status|Logical |or 3895|CCW |Physical|Address|Sense | 
| jmation |Bits |Unit [PIocS |Addr.|IOcs [in Csw |CCW | 
lo 1/2 3|4 516 7| 8 |9 11] 12 {13 15/16 23| 
|Byte(s) | Description | 
fa ae 

2-3 (cont.)  |Byte 3 |set on| 


|Bit 4: CARD Unusual command sequence, | | 
| DASD No Record Found, | | 
| 1287/1288 Document Jam or Torn Tape, | | 
| PRT1 UCSB, PRT1 UCSB Parity Check | | 
| (Command retry), 5424/5425 not ready. | | 
|Bit 5: user does not expect NO RECORD FOUND | | 
| condition, |Pr.Pr. | 
|Bit 6: PRINTER Carriage Channel 9 Overflow, |PIOCS | 
| DASD Verify error; 1287 Late Stacker | | 
| select (Doc. Mode), 1288 End of Page. | | 
|Bit 7: Channel Program is not retryable |Pr.Pr. | 
| (Command Chain — Retry will be started| | 
| from failing CCW). | | 


4-5 |Byte 4 |Byte 5 (Note 1) | 
CSW STATUS 
BYTES |Bits: |Bits: 
|O (32): Attention {0 (40): Program Controlled 


| 
| 
| | Interruption | 
| 
|2 (34): Control Unit End|2 (42): Program Check | 

| 


| 
| 
| 
| 
| |1 (33): Status Modifier |1 (41): Incorrect Length 
| 
| 
| 
| 
| 
| 


{3 (35): Busy {3 (43): Protection Check 

{4 (36): Channel End {4 (44): Channel Data Check| 
|5 (37): Device End |5 (45): Chan. Contr. Check| 
|6 (38): Unit Check |6 (46): Interf. Contr. Chk| 


{7 (39): Unit Exception |7 (47): Chaining Check | 


6-7 [Byte 6 | 
TYPE code and 


LOGICAL UNIT |B'1x00x00x' User—translated CCB 


| 

| 

| % | 
| {B'x1x0x00x' = BTAM CCB | 
| |B'Ox10x00x' = System-translated CCB | 
| |B'xxx0100x' = CCB for physical unit | 
| |B'xxx00001' = CCB for program logical unit | 
| |B'xxx00000' = CCB for system logical unit | 
| gaa ca | 
| |Byte 7 | 
| |Hexadecimal representation of SYSnnn: | 
| ISYSRDR = 00 SYSSLB = 07 SYSLUB = Oe-ff | 
| |SYSIPT = 01 SYSRLB = 08 S¥YS000 = 00 | 
| |SYSPCH = 02. SYSUSE = 09  SYSO01 = 01 | 
| |SYSLST = 03 SYSREC = OA SY¥S002 = 02 | 
| | SYSLOG = 04 SYSCLB = OB | 
| ISYSLNK = 05  SYSDMP = OC ‘ | 
| |SYSRES = 06 SYSCAT = OD SYS255 = FF | 
8 LIOCS {Buffer Offset: 

Information |ASCII Input Tapes x'00' — x'63' 
|ASCII Output Tapes Fixed X'00' 
|Variable X'00' or X'04' 


ea anea support ea anea 
[2501 Read ahead X'80' (2501 Read ahead 


| | 
| | 
| 
| | 
| |Undefined x'o0o' | 
| 
| support is active) | 
| | 
| | 
| | 


{SNS task I/O request X'80' (I/O error on 
alternate channel) 
|3895 Error information (Note 9) 


Ma i Ss a a 9 ee 
Note: Pr.Pr. stands for Problem Program 
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Command Control Block (CCB) (cont...) 


| 


|Trans— | | Type |Used by| | | | | 
|mission|CSW [Code and|LIocs | {Used by |CCW | Optional | 

Count |Infor— |Status|Logical jor 3895|CCW |Physical|Address|Sense | 
{mation |Bits |Unit |PIocS |Addr.|Iocs Jin CSW {CCW | 

o 142 3/4 5|6 7| 8 |9 11] 12 {13 15/16 23| 
|Byte(s) | Description | 
|9-11 |Virtual or real addr. of CCW associated with this CCB] 
CCW ADDRESS | (Byte 6 bit 0 = 1 Address is a REAL address) | 

| (Byte 6 bit 0 = 0 Address is a VIRTUAL address) | 

12 |X'80' CCB is used by ERP | 
PIOCS |X'40' Channel Appendage Routine present | 
Information |X'20' Sense Information desired (Note 8) | 
{X'10' Reserved , | 

|X'08' Reserved | 

|X'04' OLTEP Appendage available | 

|X'02' TAPE ERP Read Opposite Recovery in progress | 

|X'01' Reserved | 

13-15 |Address of CCW pointed to by CSW at Channel End, | 
CCW ADDRESS | (Byte 6 bit 0 = 1 Address is real) | 
from CSW | (Byte 6 bit 0 = 0 Address is virtual) | 

Jor address of the appendage routine. | 

Sass (ad aaBe dees ta acexesad a. watvds Be aaa e Wed teen tate na dead ecard ee Ciaeah Nose oioee, Regeeasseaeb fa ei aG | 
OPTIONAL | | 

| 16-23 {8 bytes appended to the CCB when Sense Information | 


Sense CCW |is desired. 


SSS) a eh ee ee 


Notes: 


1. 


fw 


Bytes 4 and 5 contain the status bytes of the CSW (Bits 32-47). If byte 2, 
bit 5 is ON and Device End occurs as a separate interrupt, bytes 4 and 5 
will contain the accumulated status information. A tape read-backward 1/0 
operation reading into loadpoint will force the UNIT EXCEPTION (Bit 47) to 
be turned on and the unit check bit to be reset (assuming byte 2 bit 7 and 
byte 12 bit 2 are both off). , 

Indicates /* or /& statement read on SYSRDR or SYSIPT. Byte 4, bit 7 (Unit 
Exception) is also on. 

DASD data checks on count not returned. 

For 1255/1259/1270/1275/1419, disengage. For 1275/1419D, I/O error in 
external interrupt routine (Channel Data Check or Bus-out check). 

The traffic bit (Byte 2, bit 0) is normally set on at channel end to signify 
that the I/0 was completed. If byte 2, bit 5 has been set on, the traffic 
bit and bits 2 and 6 in byte 3 will be set on at device end. See also Note 
1. 

This error occurs as an equipment check, data check or FCB parity check. 
For 2245, this error occurs as a data check or FCB parity check. 

Byte 2, bit 6 must be set on to allow you to accept 3505, 3525 permanent 
errors. This bit is forced on by LIOCS if the user specified ERROPT for his 
input or output files. Byte 3, bit 3 is set on if a permanent error was 
encountered. 

If User Error Routine is specified and the user needs the sense information 
to further process the error, byte 12, bit 2 must also be set. Otherwise, 
the supervisor error routine will clear off the status on return and the 
sense information is not available. 

3895 error codes are returned in CCB byte 8. Refer to 3895 Document 


Reader/Inscriber Machine and Programming Description for information on 


these error codes. 
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Input/Output Request Block (IORB) 


eee 
| Bytes | | 
| Dec Hex | Description | 


| | 7on | | 
_ 


SYSRDR=00 SYSRLB=08 |SYSO00=00 PUB entry No. 


{ QO 1 1-1 | Residual count, | 
| | Number of bytes which where not transferred by the | 
channel | 
{ 2 2 | Communication Byte 1 { 
| | Set by Physical IOCS: | 
| | x'80' WAIT Bit, Traffic Bit (Note 1)| 
| | X'40'  End~-of-—File on SYSRDR or | 
i | SYSIPT, /* or /& (Note 2)| 
| | x'20'  Irrecoverable I/O error encountered | 
| | Set by Problem Program | 
| | X'10' Prevent cancelation in case of | 
| | irrecoverable I/O Error | 
| | x'os' Reserved | 
| | x'04' User wants to be posted at | 
| | Device End (Note 1)| 
| | x'02' Reserved | 
| {| x'01' Skip system error recovery | 
| | (no Recovery Action) | 
| 3 3 | Communication Byte 2 | 
| | Reserved for ERP return information. | 
| 4 4 | Device Status Information (Note 3)| 
| | x'80' Attention | 
| | x'40' Status modifier | 
| | X'20! Control unit end | 
x'10 Busy | 
| | X'08' Channel end | 
| | X'04' Device end | 
| | x'02' Unit check | 
| | X'01' Unit exception | 
{| 5 5 | Channel Status Information (Note 3)| 
| | X'80' Program controlled interrupt 
| | x'40' Incorrect length | 
| | x'20' Program check | 
| [| X'10' Protection check | 
| | X'08’ Channel data check | 
{ | X'08' Channel control check | 
| | X'02' Interface control check | 
| | X'O1' Channel Chaining check | 
| 6 6 | IORB and device identification information | 
| | X'80' Reserved | 
| | X'40' Reserved | 
| | x'20" Copied IORB (370 mode only) | 
| | x'10' Reserved | 
| | X'08' Device is identified by PUB entry number | 
| | X'04* Control Block is an IORB | 
| | X'02' Reserved | 
| | X'O1' Device is identified by programmer | 
| | Logical Unit | 
| 7 7 | LUB or PUB entry number in the appropriate table | 
| 
| f Byte 6 | Byte 6 | Byte 6 | 
| | bit 4 off + 7 off |Bit 4 off | Bit 4 on | 
| 
| 
| | | 
| | SYSIPT=01 SYSUSE=09 |SYSO01=01 | 00 | 
| | SYSPCH=02 SYSREC=0A | SYSO002=02 | | 
| | SYSLST=03 SYSCLB=0B | ‘ | | 
| | SYSLOG=04 SYSDMP=0Cc_ | : | | 
| | SYSLNK=05  SYSCAT=0D | | | 
| | SYSRES=06  SYSLUB=0E-FF| | 2 | 
| | SYSSLB=07 |SYS255=FF | FF | 


ee a eee! 
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Input/Output Request Block (JORB) (cont...) 


(ost oo eee ee ee as 4] 

| Bytes | | 

| Dec Hex | Description | 

/— t— : 
8 8 Reserved for Logical Input Output Control System 


| | 
| (LIOCS) | 
| Virtual address of the CCW associated with this IORB| 
| Reserved for physical Input Output Control System | 
| (PIOCS) l 
| X'80'  IORB is used by Error Recovery Procedure | 
| X'40' Reserved | 
| x'20' This IORB has an extension | 
| X'10' Reserved | 
| X'08' Reserved | 
| X'04' Reserved | 
| X'02' Tape ERP read opposite recovery in progress | 
| X'O1' Reserved | 

13-15 D-F | Addresst+8 of last CCW that was executed 

16 10 | Fix Flag | 
| X'80' Fix List is already in compressed format | 
| (Each page to be fixed for channel program | 
| execution is covered only once | 
| within the FIXLIST) | 
| x'40' All pages are FIXED | 
| (The user has already fixed all the pages | 
| need for channel program execution) | 
| x'20' Reserved | 
| X'10' Reserved | 
| X'08' Reserved | 
{| X'04' Reserved | 
| X'02' Reserved | 
| X'O1' Reserved | 

17-19 11-13 | Address of FIXLIST 

20-21 14-15 | IORB Version identification code 

22-23 16-17 Special processing flags set by LIOCS | 

Bit 0 SYSFIL request for FBA Device | 

| Bits 1-15 Reserved | 


OPTIONAL 
24 18 Parameter ID: 
Bit 0 Identifies the last optional Parameter 


Bits 1-7 Parameter ID 


B'o000000' ECB ID 
B'xxxxxxX' Reserved 


25-27 19-1B Address portion of optional Parameter 


| 
if e e 
e e e 
| | Parameter ID: | 
five vengd chen la S t codes Reta tea Bee Mra orth a oleae NE 8 ate 8 Sen eo te tue! Mt Rees te | 
| | Parameter ID: | 
Wes a oe nr | 


Notes: 


The WAIT Bit (byte 2, bit 0) is normally set on at Channel End to to signify 
that at least the data transfer is completed. If byte 2, bit 5, has been 


set on, the WAIT Bit is set at Device End. 


Unit Exception (Byte 4, bit 7) is also turned on. 


Bytes 4 and 5 contain the status bytes of CSW (Bits 32-47) which is always 


the accumulated status information received so far. 
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SICAL UNIT BLOCK TABLES (PUBTAB, PUB2, PUBOWNER) 
2 Relationship 
SYSCOM 
0 64 67 
(o.—————_- Sere Ye he le ete SS 
| eee | IJBRFTAB | eee 
en eee eee er nee | 
| 
| 
— 
| 
| 
V _RFTABLE 
fa “aoe oes dl 
| | 
| | 
| 3C 3F | 
| aE | PUB2 
| |RFP2ENT }|-———____,- > p> ———___, 
* PUB index | L_—_—_§—J | | | | 
| | | | Seep 
| | RFP2ITAB | | | | 
| oe oP 
40 ° e 
| Vv | | | Vv Sa 
L______-_ + ——> 42 | }———_-_-__ + >| 
| — | Sa 
| . . | | | 
ff | — 
| oe? | 


Label | Description 


0-3 0-3 | P2USAGE | Usage count (number of non-ERP SIO) 
4 4 | P2FLAGS | Flag byte common to all PUB2 entries 
| P2INTSM | X'80' Device is in intensive mode 
| P2DIAGM | 40 Device is in diagnostic mode 
| P2NORCM | 20 No recording mode 
P2STAT2 | 10 Call statistics transient 2 
P2NAMEF | 08 Use PUB2 name completion field 
P20PEN | 04 Volume opened on this device 
| 02 Reserved 
| O01 Reserved 
5 5 P2LIMIT | CE mode limit byte 
P2BBMASK | CE mode byte/bit mask 
6 6 PUB2EXT | End of basic PUB2 
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comm 


He. 
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Physical Unit Block Table 2 Extensions 


Unit Record and Unsupported Device Extension 


Wa a Ne 7 
| Bytes | | | 
| Dec Hex | Label | Description | 
| 6 6 | P2UNITX | Start of unit record PUB2 | 
| 6-11 6- B | SDRUNITR | SDR counters for unit record devices | 
| 12 Cc | P2UNITE | End of unit record PUB2 | 
IO ee ete ON a eS eae eae PP ae 


3540 Diskette Extension 
r —=T + Pa a aL oe 
| 


| Bytes | | 
| Dee Hex | Label | Description 


H 6 6 | P23540X | Start of PUB2 extension | 
| 6-13 6- D | SDR3540 | SDR counters | 
| 14-15 E- F | P23540R | Reserved | 
| 16 10 | P23540E | End of 3540 PUB2 | 


3211 Printer Extension 


SS ab ae eh oes Sh el, Te eee a 
| Bytes | | | 
| Dec Hex | Label | Description | 
Sin aR GGT euene Sas PROTEST ERA | 
| 6 6 | P23211X | Start of PUB2 extension | 
| 6-11 6- B{ SDR3211 | SDR counter area | 
} 12 Cc | P23211E | End of 3211 PUB2 | 
Da pa ac a pe ra erp er ey een a ei a ena 


3800 Printer Extension 


Foote Qe ee ee ee ge eg ee ae ay 


| Bytes | | | 
Dec Hex | Label | Description | 
6 6 P23800X Start of PUB2 extension 
6 6 PB2SDR1 Channel data checks 
7 7 PB2SDR2 Cont forms stacker misfolds 
8 8 PB2SDR3 Burster/trimmer jams 
9 9 PB2SDR4 No burst check 
10 A PB2SDR5 Burster/stacker jams 
11 B PB2SDRE End of counters area 
11 B PB2DFLG Default flags 
PB2DBRST X'80' Default spec.=burst 
12-15 C- F Reserved 
16 —- 19 10 — 13 PB2DFCB Default fcb id 
20 — 23 14 - 17 PB2DCHAR Default char. arrangement table id 
24 —- 27 18 — 1B PB2DMDFY Default copy modific. id 


| | 
| | 
| | 
| | 
| 
| | 
| | 
| | 
| | 
| | 
| | 
| 28 - 31 10 - 1F | PB2DFLSH 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
Default forms overlay frame id | 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


32 — 35 20 — 23 PB2DFORM Default paper forms id 
36 24 PB2DFTE End of default area 
36 — 39 24 - 27 PB2WCGMS Character sets presently load 
40 28 PB2WMOD WCGM# with modified character sets 
PB2WMODO X'80' WCGMO contains a modified 
character set 
PB2WMOD1 40 WCGM1 cont. a mod.chr set 
PB2WNOD2 20 WCGM2 cont. a mod.chr set 
PB2WMOD3 10 WCGM3 cont. a mod.chr set 
41 29 PB2FLAG1 First byte of flags 
PB2BURY X'30' Burst = Y last specified 
PB2BURN 10 Burst = N last specified 
PB2UDCHK 08 DCHK=U was specified 


a ac i Nl ee et 
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3800 Printer Extension (cont. ) 


[ee ey en Se i ee 
| Bytes | | | 
Dec Hex | Label | Description 


42 2A PB2FLAG2 Second byte of flags 
PB2TRCY X'30' TRC=Y was specified 
PB2TRCN 10 TRC=N was specified 
PB2DEBTR OE Debug = trac last specified 
PB2DEBDU OA Debug = dump last specified 
PB2DEBTE 06 Debug = term last specified 
PB2DEBNO 02 Debug = none last specified 
43 2B Reserved 
44 — 47 2C — 2F PB2FCB Currently loaded FCB id 
48 — 63 30 - 3F PB2CHAR Character arrangement tables (CAT) 
48 — 51 30 — 33 PB2CHARi Id of 1st CAT currently loaded 
52 —- 55 34 - 37 PB2CHAR2 Id of 2nd CAT currently loaded 


| | | | 
| | | | 
| | | | 
| | | | 
| | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| 56 — 59 38 — 3B | PB2CHAR3 | Id of 3rd CAT currently loaded | 
| 60 — 63 3C — 3F | PB2CHAR4 | Id of 4th CAT currently loaded | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 


64 —- 67 40 — 43 PB2CMCHR Td of CAT used when 
loading current copymode 
68 — 71 44 — 47 PB2CPMOD Id of copymode currently 
loaded into the printer 
72 — 75 48 — 4B PB2FORMS Id of paper form currently loaded 
76 — 79 40 — 4F PB2FLASH Id of current forms overlay frame 
80 — 87 50 — 57 PB2COPYG Eight copy group count 
last received by setprint 
88 58 PB2CINDX Copy group id (received by setprint) 
89 59 PB2FLSHC Flash count last received by setprint 
90 — 91 SA — 5B Reserved 
92 5¢ P23800E End of 3800 PUB2 
ne sem 


3886 Optical Character Reader Extension 


Bt er ee ee ihe eat a eae on | 

| Byte | | | 

| Dee Hex | Label { Description | 

i = + SoS ete te 
| SDR counter area | 
| 


| 6-25 6-19 | SDR3886 
| | 


P23886E End of 3886 PUB2 | 


3890 Document Reader Extension 


| Bytes | 

| Dec Hex | Label | Description | 
Ja pt 
| 6 6 | P23890X {| Start of PUB2 extension | 
| 6-15 6-— F | SDR3890 | SDR counter area | 
| 16 10 | P23890E | End of 3890 PUB2 


SS a re a ae ee ee 


Disk Device Extension 


| Bytes | | Ie 


Label | Description 


| 6 6 | P2DISKX | Start of PUB2 extension | 
| 6 6 | P2DFLG | Disk flags | 
| | P2SDERRQ | X'80' Soft DASD error is queued | 
| | P2DLOG | 40 ERP requests error logged | 
| 7- 8 7- 8| | Reserved | 
| 9 9 | P2DMOD | Physical module identifier | 
| 10-15 A~ F | P2DVOL | Volume serial number | 
{ 16 10 | P23330E | End of 3330 PUB2 | 
{| 16 10 | P23340E | End of 3340 PUB2 | 
| 16 10 | P23350E | End of 3350 PUB2 | 
| 16 10 | P2£BAE | End of FBA PUB2 | 
| 16 - 23 10 ~ 17 | SDRDISK | SDR counters for 23x« | 
| 24 18 | P2DISKE | End of 23xx PUB2 | 


SSS (aN er ee | 
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Tape Device Extension 


==, Pe ars an | 
| Bytes | | | 
| Dec Hex | Label | Description | 


24 —- 31 18 — 1F| P2TWORKA 
32 -— 37 20 — 25| P2TVOL 
38 — 39 26 -— 27| P2TBLK 
40 - 43 28 — 2B| P2CCWAD 
44 2c | P2CSWRES 


ERP work area 
Tape serial number 
Block length 


Reserved 

Save area for run ERP 
For CSW in error 

For sense bytes 0,1 
For sense byte 5 


48 — 63 30 — 3F| P2RUNSAV 
48 —- 55 30 -37| P2TSCSW 
56 — 57 38 — 39| P2TSSNSO 

58 3A | P2TSSNSS 


| 6 6 | P2TAPEX | Start of PUB2 extension j 
| 6- 7 6-— 7 | P2TNAME | Name of ERP that wants control | 
| 8 8 | P2TFLG1 | Tape flags 1 | 
| P2TUNSOL | 40 Unsolicited interrupt for tapes| 
| | P2TERP | 20 ERP is in control | 
| | P2TREPO | 10 ERP requests repositioning | 
| | P2TIEORG | 08 Use original tie byte; if off | 
| | | the opposite tie is used | 
| | P2TECPT | 04 Intercept next SIO request | 
| | P2TROR | 02 ERP read opposite request | 
| | P2TREST | O01 Restart users CCW chain | 
| ) 9 | P2TFLG2 | Tape flags 2 | 
{ 10 A | P2TFLG3 | Tape flags 3 | 
| 11 B | P2TEMPR | Temporary read count | 
| 12 Cc | P2TEMPW | Temporary write count | 
13 D | P2NOISE | Noise record count | 
| 14-15 E- F| P2ERG | Erase gap count | 
| 16-17 10-11] P2CLEAN | Cleaner action counts 

| 18 12 | P2PRD | Permanent read errors 

| 19 13. | P2PWT | Permanent write errors | 
| 20 14 | P2ORGTIE | Tie original direction | 
| 21 15 | P2OPPTIE | Tie opposite direction 

| 22 16 | P2ECTRO | ERP counter | 
| 23 17. {| P2ECTRi | ERP counter | 
| | | 
| | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| 59 — 63 3B —- 3F| | Reserved | 
Peoeiatetie 2400: -EXtOnS LOM sins Sse bad Seed eee boa eh Se Pa ee | 
| 64 ~ 73 40 -— 49| SDR2400 | 2400 SDR area | 
| 74-75 4A — 4B | Reserved | 
| 4¢ 4c | P22400E | End of 2400 PUB2 | 
beeaG expels 3420 Extens fom xus iy et eh ees vid hae as Galen Gah a ees els | 
| 64 - 83 40 — 53| SDR3420 | 3420 tape drive counter area | 
| 84 54 | P23420E | End of 3420 PUB2 | 
L Pea So) ee 
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Physical Unit Block Ownership Table (PUBOWNER) Entry 


| Bits | Description | 
| O | Device is owned by ACF/VTAM | 
| 1-2. | Reserved | 
| 3 | Device is owned by the system (e.g. contains PDS extent) | 
| 4-15 | Identifier of Partition owning the PUB | 


Partition owning the PUB if number of partitions is | 


setting] 2] 3] 4{ 5] 6] 7|{ 8{ 9 | 10] 11 | 12 | 


| 

| 

| 

| |x'ooo' | UNASS IGNED—-___________ | 
| | oo1 | BG | BG { BG | BG | BG | BG {| BG | BG } BG | BG | BG | 
| | oo2 | Fi | F2 | F3 | F4 [| FS | F6 | F7 | F8 [ F9 | FA | FB | 
| | 004 | | Fl | F2 | F3 | F4 | F5 { F6 | F7 | F8 | F9 | FA | 
| {| oos | | | Fi. | F2 | F3 | F4 | FS [| Fo | F7 | F8 | F9 | 
| | o1o | | | | Fl | F2 | F3 | F4 [ FS | F6 | F7 { F8 | 
| | o20 | | | | | Fi. | F2 | F3 | F4 [| F5 | F6 [ F7 | 
| | 040° | | | | | | Fi | F2 | F3 | F4 | F5 | F6 | 
| {| oso | | | | | | | Fl | F2 | F3 [| F4 | FS | 
| | 100 | | | | | | | | Fl | F2 | F3 | F4 | 
| | 200 | | | | | | | | | Fl | F2 | F3 | 
| | 400 | | | | | | | | | | F1 | F2 | 
| | 800 | | | | | | | | | | | F1 | 


Bytes 120 - 123 (X'78'-X'7B') of the System Communication Region (SYSCOM) 
y y 


contain the address of the PUB Ownership Table. Label PUBOWNER identifies the 


first byte of the table. 
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device is up 
Device DOWN: All zeros 

5: Device supports RPS 

6: Primary path is not 
operational 

7: Secondary path is not 
operational 

$f 

| Note: A PUB entry must be added during IPL for any device of the | 


installation. | 
a ge a 8 se 
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’ ; 
Td Physical Unit Block Table (PUBTAB) 
fo—7 > 2. | — 1 a er se ee 
| Bytes | | | 
| Dec Hex | Label | Description | 
| 0 0 | PUBCHANN | Channel number of device (Hex 0-F) | 
| | | X'FF' indicates end of PUBTAB | 
| 1 1 | PUBDEVNO | Unit number | 
: | 2 2 | PUBCHQPT | Index to first CHANQ entry | 
ve y | | | X'FF' indicates no request enqueued | 
| 3 3 | | Reserved | 
| 4 4 | PUBDEVTY | Device type code | 
| 5 5 | PUBOPTIN | For TAPE devices: Tape Mode from | 
| | | ADD or ASSGN | 
| | | For Disk devices: Index of TRKHLD | 
| | | Table entry or X6 | 
| | | For MICR devices: External line | 
| | | in use 
fa \ | | | For 3704/3705: Type of channel | 
: | | | adapter 
ord | | | For 2560 or 5424/5425: | 
| | | X'80' Repositioning required (ERP) | 
| | | 40 SYSPCH temporarily assigned | 
| | | to hopper 2 
| | | 20 SYSIPT temporarily assigned | 
| | | to hopper 2 
| | | 10 SYSRDR temporarily assigned | 
| | | to hopper 2 
| | | 08 Reserved 
| | | 04 SYSPCH permanently assigned | 
| | | to hopper 2 | 
| | | 02 SYSIPT permanently assigned | 
| | | to hopper 2 [ 
| | | O01 SYSRDR permanently assigned | 
| | | to hopper 2 | 
| | | For 3800: | 
| | | Bit 0-1 | 
| | | 00 3800 | 
| | | 01 3800 B | 
| | | 10 3800 C | 
| | | 11 3800 BC | 
| 6 6 | PUBCSFLG | Channel Scheduler flags | 
| | DEVBSY | X'80' Device is active | 
| | SWITCH | 40 Device is switchable 
| | | 20 Reserved 
| | QEDERR | 10 I/O error queued for recovery | 
| | OPINTV { 08 Operator intervention required | 
| | INTPEND [| 04 Interrupt was trapped by SDAID | 
——o" | | BRSDEV | 02 Burst or overrunable device | 
| | SVNTRK | 01 7-track tape unit | 
| 7 7 | PUBJCFLG | Job Control flags | 
| | | Bits 0-4: TAPE : Standard MODE | 
| | | assignment | 
| | | Not TAPE : All ones if | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 
| | | | 


Bytes 64-65 (X'40'-X'41") of the Partition COMREG contain the address of the PUB 
table. Label PUBTAB identifies the first byte of the table. 
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Channel Queue Table (CHANQ) 
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Bytes 37-39 (X'25'-X'27') of the System Communication Region (SYSCOM) contain 
the address of the Channel Queue Table. Label CHANQ identifies the first byte of 


the table. 


Pg ee ee ee ea Sa ea BE Gy ew go Te ee] 


| Bytes 
Dec Hex | 


Label 


SSS 


e 
oO 
aw Pwo 


13-15 D-F 


16 10 
17-18 11-12 
19 13 
20 14 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
21 15 | 
| 
| 
| 
| 
| 
| 


CHQCHAIN 


CHQCCBAD 


REQID 
CHQPROC 
CHQDOINT 
CHQDQUNC 
CHQNODEQ 
CHQPRCBF 
CHOPROCF 
CHQDASFP 
CHQFILE 
CHQSFFBA 
CHOSLUB 


TKREQID 

CHQCCSIO 
CHQCCACT 
CHQCCALT 
CHQCCPRI 
CHQCCLTE 


CHQCCRUN 
CHQCCCSW 
CHQCCBSY 
CHQCCNOP 
CHQCCBB1 
CHQCCBB2 
CHQCCBB3 
CHQPFIX 

CHQPFIXL 


CHQERRCT 


CHQPUBNO 
CHQFLG1 
CHQHQU 
CHQHQA 
CHQCSBSY 
CHQCSQED 
CHQDIDJA 


CHQFSIO2 
CHQFSIO1 
CHQGRP 

CHQGROLT 
CHQGRBTM 
CHQGRVTM 


CHQGRRAS 
CHQGRROK 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


Description 


Index of next entry in free list 
or device queue. 


X'FF! 


indicates the last entry. 


Address of CCB/IORB associated 
with I/O request 

PIK of service owner 

Logical processing flag required 


x'8o' 
40 
20 
10 
08 
04 
02 
01 


Interrupt not yet processed 
Dequeue unconditional 

Do not dequeue entry 
Console buffering request 
OCCF request 

DASD file protect needed 
SYSFIL on CKD device 

SYSFIL on FBA device 


System logical unit number associated 
with request X'FF' if this is 

a programmer unit (SYSO00-SYS254) 
Task ID (TID) of request owner 

SIO flag byte 


x'80' 
40 
20 
10 


08 
04 
02 
01 


Device is running 
Alternate channel 1/0 
Primary channel I/0 

Long time entry (Missing 
Interrupt Handler) 
Condition Code 0 
Condition Code 1 


Condition Code 3 


Copied from byte 2 of CCB/IORB 
Copied from byte 3 of CCB/IORB 
Copied from byte 12 of CCB/IORB 
Reserved for page fixing routine. 
Address of user specified or 
internal fixlist 

Error retry count 

Reserved 

PUB entry number 

Flag byte 


x'8o' 
40 
20 
10 
08 
04 
02 
01 


Unconditional request 

Head queue request 

Device busy status from PUB 
Device queued-in-error from PUB 
Request was already accounted 
Reserved 

Start on alternate channel only 
Start on primary channel only 


Requestor flag 


X'80' 
40 
20 
10 
08 
04 
02 
ol 


OLTEP request 

BTAM request 

VTAM request (new interface) 
Reserved 

RAS request 

Successful retry 

Reserved 

Reserved 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
Condition Code 2 | 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


a a ee ee) 
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Channel Control Table (CHNTAB) 
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Channel Queue Table (cont...) 


[> —. 2 oe er? 
| Bytes | | | 
| Dec Hex | Label | Description | 


o_o 


from CSW 


| 22 16 | CHQDEV | Device group indicator | 
| | CHQDASD {| X'80' CKD device or diskette | 
| | CHQFBA | 40 FBA device | 
| | CHQTAPE | 20 TAPE device | 
| | CHQTP | 10 TP (teleprocessing) device | 
| CHQCRT | 08 2260 or 3277 device | 
| | CHQURC | 04 Unit record device | 
| | | 02 Reserved | 
| | | O01 Reserved | 
| 23 17 | CHQIOINF | Delayed interrupt exit indicator | 
| | X'00' Dispatcher (DISP) | 
| | | 04 I/0 initiator (INITRG) | 
| | | 08 I/O interrupt handler (INTRTN)| 
| | | OC Error ignore routine (IGNORE)| 
| | | 10 Cancel with code X'1A' (ERRIA) | 
| | | 14 Reserved | 
| | {| 18 Dequeue routine (DEQUNCON) | 
| | { 1C Post routine (PSTRESET) | 
| | 20 Emergency MSG writer (EMWINTRQ) | 
{ 24 18 | CHQCAWKY | Storage protect key | 
| 24-31 18-1F | CHQCSW | Accumulated status information | 
| | | | 


Label CHNTAB identifies the first byte of the Channel Control Table. 


| Bytes | | 
| Dec Hex | Label | Description | 
| 0 0 | CHNTYPE | Channel Flag Byte | 
| NTOPCHN | X'80' Channel not operational or | 
| | | not present | 
| | | 40 Reserved 
| | BLCKCHN | 20 Block multiplexer channel | 
| | MPXCHN | 10 Byte multiplexer channel | 
| | { 08 -04 Reserved | 
| | BRSTCHN | 02 Byte multiplexer running in | 
| | | burst mode | 
| | BMPXCHN | 01 Byte multiplexer with burst | 
| | | devices attached 
| 1 1 | CHNTERR | Number of unit checks pending on | 
| | | this channel | 
| 2 2 | CHNTFLG1 | Processing Flag Byte | 
| | CHNRSTRT | X'80' Channel must be restarted | 
| | CHNRSDEV | 40 At least one device busy | 
| | | during restart | 
| | | 20 -10 Reserved | 
| CHNISBSY | 08 Channel is busy 
| | | 04 -01 Reserved | 
| 3 3 | CHNTFLG2 | Channel ID (Channel No.) | 
| 4-7 4-7 | CHNTPUBF | Address of first PUB on channel | 
| 8-11 8-B | CHNTPUBL | Address of next PUB to be started | 
| | | on channel | 
| 12 C | CHNTCNT | Channel Balance Count | 
| 13-15 D-F | CHNTPUBB | Address of PUB that needs channel | 
| | 


exclusively 
re Pe meee) {TW nce NO Ce Oe Ae TE CRE IND Ne PORN SS RETO EE eS en EE OC PET UN EERE 
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A PUBX entry is addressed via address table APBXAREA at offset 4*PUB index (see 


Figure below). 


4 * PUB index ———-————-> + 
| 
PUBXAREA | 
| | | 
0 
| | | 
4 
| | | 
8 
— | 
a 
aa 
| 
| 1 
i | vee | 
| | —1— 
L—_>| coe | 
= ed 
e 
° 
e 
Clo ea ee Saat 
eee 
a | 
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(Label in Supervisor) 


| ie area | 
<________| APBXAREA | 
| | 


A 
| 
| 
| 
PUBX address vector 
| 
| 
| 
Vv 
A 
| 
| 
PUBX table 


| 
| 
V 


aes 


aaa 
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PUBX (Physical Unit Block Extension) 


(ak ee ee ge ee a ee 


| Bytes | | 
| Dec Hex | Label | Description | 
a 
| 0 i) | PBXFLG | Flag byte | 
| | PBXDASD | X'80' DASD device | 
| | PBXTAPE | 40 Tape device | 
| | PBXUR | 20 Unit record device | 
| | | 10 — 02 Reserved | 
| | PBXSLOG | 01 SYSLOG device | 
| | | | 
| 1 1 | PBXFLAG1 | Flag byte | 
| | PBXSHR | X'80' Partition sharable device | 
| | | Is on for DASD devices, for | 
| | | the SYSLOG device and for unit | 
| | | record devices, which are | 
| | | sharable as POWER dummy devices| 
| | PBXMIFLG | 40 Mount request pending | 
| | | 20 -— 01 Reserved | 
| | | 
{ 2-3 2- 3 | PBXCUU | CUU address | 
| | | | 
| 4 4 | PBXPUBCD | VSE device type code | 
| | | 
| 5-11 5- B | PBXSNSID | Sense device type information | 
| 5 5 | | X'FF' If entry is valid | 
| | | | 
| 6-— 7 6- 7 | PBXCUTYP | Control unit type number | 
| | | | 
| 8 8 | PBXCUMOD | Control unit model number | 
| | | 
| 9-10 9- A | PBXDVTYP | Device type number 
| | | | 
| li B | PBXDVMOD | Device type model number | 
| | | 
| 12-13 C-~ D | PBXOWNER | PIK of partition owning the device, | 
| | | if applicable | 
| | | 
| 14-15 E-F | | Reserved | 
[kha Marpaticdeboe ete Sa tid aig be dedi aee oe o htut eed ee Manse. Gite Ga wee waned es | 
| | | (if PBXSHR OFF) | 
| | | | 
| 16-19 10-13 | PBXUSCNT | Device usage counters | 
| | | | 
| 20-23 14-17 | PBXJACNT | Job Accounting SIO counters | 
| aot: suaites eteudsa: Sate with oleeeie Glu. braid Wit casa Bae hrarecgreecdues rated ae cetaabine land diane Ca oh eked wid | 
| | (if PBXSHR ON) | 
| | | 
16-19 10-13 | PBXUSOFF | Offset of usage counters within | 
| | partition string | 
| | | 
20-23 14-17 | PBXJAOFF | Offset of SIO counters within | 
| | | 


partition string 
PBXERBLK | Addr. of Error Entry for this device | 


| 

| 

| PBXCLNG | End of common section | 
ba adele dtiee een End of section common to all devices.................| 

| 

| 

| 

| 

| 

| 


28-31 1C-1F PBXCCW | DASD devices: Address of Set File | 
| Mask CCWs | 
| TAPE devices: Addr. of Set Mode CCWs | 
| | 

32 20 PBXTLNG | End of tape device section | 
32 20 PBXDLNG | End of DASD device section | 
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ERBLOC Area 
ie oo ee ee ey eS eS Oo oo 
| Bytes | | | 
Dec Hex |  Iabel | Description 


148-151 94-97 Pointer to SNS TIB 


| 0-7 0-7 | SVC5NM | Name of first/next ERP Transient | 
| | | to be fetched | 
| 8-11 8-B | YRETRY | Continuation address for retry | 
| | | I/O request (INITRG) | 
{ 12-15 C-F | YIGNORE { Continuation address to ignore | 
| | | I/O error (IGNORE) | 
| 16-19 10-13 | ACANCEL | Continuation address to cancel | 
| | | I/O request (ERR1A) | 
| 20-23 13-17 | YERPEXIT | Common DSK/ERP return address | 
| | | (ERPEXIT) 
{| 24-75 18-4B | ERQI | Area to pass recovery and recording | 
| | | information to the ERP. | 
| | | Its layout is the same as for | 
| | | a single error block, except for | 
| | | the 8-byte header (See note) | 
| 76-111 4C-6F | SNSSDAID | Sense data saved by SDAID | 
| 112-119 70-77 | ERCHNOFT | Chain header offset table, used to | 
| | | address the following error chains | 
| 120-123 78-7B | RASERCHN | Address of first RAS error entry | 
| 124-127 7C-7F | | Pointer to RAS TIB | 
| 128-131 80-83 | ERPERCHN | Address of first ERP error entry | 
| 132-135 84-87 | | Pointer to ERP TIB | 
| 136-139 88-8B | DSKERCHN | Address of first DSK error entry | 
| 140-143 8C-8F | | Pointer to DSK TIB 
| 144-147 90-93 | SNSERCHN | Address of first SNS error entry | 
| | | 


Bytes 0-3 (X'00 - X'03') of the System Communication Region contain a pointer to 
the ERBLOC area. 


There is one I/O error block for each device. Field PBXERBLK in the PUBX 
contains a pointer to this block. 


An additional error block exists for some system tasks. The address of this 
block is contained in field TCBERBLK of the system task TCB. 
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eee End of UNIT CHECK entry **eeeeeeeee Layout of RECORDING entry °¢¢ 


f 1 T 
| Bytes | | | 
| Dee Hex | Label | Description | 
ae += 
| 0-3 0-3 | ERBLKPTR | Pointer to next error block or 0 | 
| 4 4 | ERBLKFLG | dod byte | 
| | HQERBLK | X'80' System task error block | 
7 H | ALTCHANN | ie Error on alternate channel 
3 | ERSNSDAV | 20 Sense data available 
od | |). "ERACTIVE’ (P -LOs Exsor block activa | 
| | ERQUEUED | 08 Error block is enqueued in | 
| some error chain 
| | 04 - 01 Reserved | 
5 5 | ERBLKFLG1 | Flag byte a | 
| | X'8G — 10' Reserved | 
| NEEDSNS | 08 Must be processed by SNS task | 
| NEEDDSK | 04 Must be processed by DSK task | 
,. 9D | | NEEDERP | 02 Must be processed by ERP task | 
f \ | NEEDRAS | O01 Must be processed by RAS task | 
ee | 6 6 | | Reserved | 
Sd | 7 7 | ERBLKSNL | Number of sense bytes | 
vee End of error block header *e*e**** Layout of UNIT CHECK entry °*¢| 
| 8-15 8-F | ERRQCSW | CSW of I/O error 
16-17 10-11 | ERRQPUB | PUB pointer of affected device 
18 12 | ERRQFLG | Flag Byte 
| TRUNRF | X'80' No record found on DASD | 
| | | 40 Interv. required (set by ERP) | 
| | | 20 Pass back error information 
| | (set by ERP) | 
| IGNERR | 10 Channel program is not | 
| | retryable (IGNORE) 
| SUCCESS | 08 Error successfully recovered 
| (IGNORE) 
| RTYERR | 04 Channel program is retryable 
| | RECONLY | 02 Error to be recorded only | 
OCCUP | 01 Error block is in use (set only| 
| for error block in ERBLOC area) 
19 13 ERRQNSG | Message Code 
| 20-23 14-17 | ERRQSEK | Used for disk devices only | 
| | CKD: Failing Seek address | 
| FBA: OS device type codes 
24 18 ERRQCQPT | Index of channel queue entry 
| | | X'FF' for unsolicited error 
| 24-27 18-1B | ERRQCCB | CCB pointer (addr. = 0 if not avail.)} 
28-... 1C-... ERRQSNS | Sense data | 


| 8-11 8~B | ERQAEADR | SD record address 
ERQAEINF | SD record information 
dl 12 c ERQAELEN | Length of SD record 
13 D | ERQAETYP | Type of SD record 
| 14 E | ERQAESW1 | Record dependent switch 1 
| 15 F ERQAESW2 | Record dependent switch 2 | 
16-17. 10-11 ERQSEPUB | PUB pointer of affected device | 
18 12 | ERQAEFLG | Flag Byte 
| X'80' SD record is TFIX-ed | 
| 02 Must be 0 for recording info. | 
: . OCCUP | 01 Error block is in use (set only| 
: | | | for error block in ERBLOC area) | 
‘ea | 19 13 | ERQAEMSG | Contains X'AE' for Alternate Entry | 
| 20-23 14-17 ERQAETIB | TIB of requesting task | 
| 24-27 18-1B | | Reserved | 
| 28-... 1¢-. | ERQAECOM | Communication information | 
fece End of RECORDING entry *°*eee* Layout for CHANNEL CHECK entry °*¢| 
| 8-31 8-1F | See Note. | 
ae aif j 
Note: 
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CONTROL BLOCKS FOR CCW FIXING AND TRANSLATION 


Relationship of Control and Work Blocks for CCW fixing(VSE:EXCP) 


Figure below shows the relationship of the control and work blocks for the CCW 
fixing function. 


Block 1 Block 2 Block3 Free oie 


rs | 
| AFFB_/_}————>, ——— >> >, >>>, Workblock 
——} | bf | | | | Queue 
| f+ | ee | [-—> eee 
LY | ee ere 


omy, 


a | FHB1 FHBm Active 
| AFHB | cs r.->>——————_ FHB 
LH | | 3 | | Queue 
| beeees Se a ie 4d =, 28° 
TIB L____ ,—_>]|FHBNEXT }. .4 i_______J 7 
oases | a 
| TIBTCB | | | | fi 
| | | Xe 
| | | | . 
| S| 
| FRB in | --4FHBLIST | 
V TCB + 124 | | L____ 
1 | | FLB1 FLB2 
|FRBAFHB_ ,|_-———__—___! > ,-$—_____,__ >> —————__ Fixlist 
t= | oe | 
| FRBLLPTR |} ——_ | — | [> eee 
Cc }—_——_} ee ree | | ree | 
| FRBLNPTR |—; 
t+————j | V Block 1 Block 2 Block 3 
bd | SSS eS SSS ESS Locate 
| bot od ys oft | List 
| f= “4 jas | pe ses 
| [ie ee | ere | Le 
| 
| Block 1 Block 2 Block 3 Line— 
eS Sa ee eo (eae pointer 
| | | List 
| YH | }—> eos 
erie! L aan eres 
Fix Request Block 
The Fix Request Block (FRB) serves as a dynamic save area and work area. It is ae 
located in the TCB work area. (CCW fixing part) Since a fixing request may be { 
\ 


interrupted (for example by a page fault, wait), the fixing routine has to be 
partially re-enterable to enable the handling of several requests 
simultaneously. 


‘ a 


4-36 IBM VSE/Advanced Functions Handbook 


Licensed Material - Property of IBM © Copyright IBM Corp. 1985 
Fixlist Header Blocks (FHB) 


0 
|Flag Byte 1|Flag Byte 2| | Note: 
| (General | (Reserved) | TID of | Bytes 120-123 (X'78-7B') 
| Fixing | | Requester | (Label FRBAFHB) in the 
|Function) | | | CCW fixing work area of 
Rt i ———4 _ the Task Control Block 

4 | Pointer to next active FHB | (TCB) contain the address 
po oof the Fixlist Header 

8 | BAl * | EAl * | Block (FHB). 
ee es eee 

12] BA2 | EA2 | 
a 

16| BA3 | EA3 | 
} = ee aE 

20| BA4 | EA4 | 
f —4 a 

24| BAS | EAS | 
a 

28| BA6 | EA6 | 
| ——______- 4 

32| Pointer to next fixlist block | 

pa 


Layout of Fixlist Header Block (FHB) for General Fixing Function 


gle eee —F 


om 
|Flag Byte 1|Flag Byte 2| | * BA = Page number multi- 
|(General |(Fast | TID of | plied by 8 of first 
| Fixing | Fixing | Requester | page to be TFIXED. 
|Function) |Support) | 
; nea {| * EA = Page number multi- 
4 | Saved queue forward pointer | plied by 8 of last 
| page to br TFIXED. 
8 | Saved queue backward pointer | 
} 4 
12| Pointer to replica or zero | 
IL — 
16| Pointer to next active FHB | 
sa a. =| 
20] BAL * | EAL * 
L + 4 
24 | BA2 | EA2 | 
| + 7 
28 | BA3 | EA3 | 
—t | 
32| Pointer to next fixlist block | 
| 


Layout of Fixlist Header Block (FHB) for Fast Fixing Support 
The meaning of the flag bytes is as follows: 
Flag Byte 1 (General Fixing Function): 


Bit O=1: Fixing function request complete. 

Bit 1=1: At least one page is fixed for 
this task or the fixing request 
is pending. 

Bit 2=1: Fixing of pages required. 

Bit 3-7: Reserved. 


Flag Byte 2 (Fast Fixing Support): 
Bit O=1: Fast fixing in progress. 
Bit 1=1: FHB belongs to saved FHB queue. 


Bit 2=1: IORB request. 
Bit 3-7: Reserved. 
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Fixlist Block (FLB} 


8 | BA3 EA3 | 
12| BA4 EA4 | 
16| BAS EAS | 
20| BA6 EA6 | 
24 | BA7 EA7 
28 | BA8 EA8 

[-- 


32| Pointer to next fixlist block or zero 


L 


| 
| 
i 


Layout of Fixlist Block (FLB) 
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Note: Bytes 32 - 35 (X'20 - 23') of the Fixlist Header Block (FHB) contain the 
address of the Fixlist Block (FLB). 
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LTID (Logical Transient Owner) 


The LTID, a halfword (LIK) at displacement 88 in the system communication 
region (SYSCOM) contains the same value as the TID when the Logical Transient 
Area (LTA) is in use and, therefore, identifies the owner of the LTA. When the 
LTA is free, the LTID is zero. The SVC 2 (X'02') routine sets the LTID, and the 
SVC 11 (X'OB') routine resets it to zero. : 


Notes: 


1. Do not use this interface any more. 


2. Any logical transient routine may find its own task identifier by using the 
TID field. 


Logical Transient Key (LTK) 


The logical transient key, a halfword (LTK) at displacement 110 in each 
partition communication region (COMREG), has a zero value in the high-order byte 
and a key value in the low-order byte. In a foreground communication, the key 
value in the LTK is not significant. The LTK in the background communication 
region (BG-COMREG) has the same value as the PIK of the partition of the task 
that owns the LTA, or contains zeros when the LTA is free. When the LTA is 
occupied by the task, therefore, the BGCOMREG has the same value in its LTK as 
in its PIK when the owning task is active. 


Note: This LTK interface should not be used anymore. 


1/O Requestor’s Partition or System Task ID (REQID) 


The REQID is a one-byte identifier in the Channel Queue (CHANQ) entry, used for 
storing the service owner identification. When a background or foreground 
program requested the I/O operation, the REQID has the value of the partition 
identification key. When a system task requested the I/O operation, the REQID 
contains the partition identification key of the service owner. The REQID is set 
by the Channel Scheduler Routine. 


Locate List Block 


A locate list is built during the scanning of the channel program of an EXCP 
request that uses a CCB. Each locate list block consists of four 8-byte 
entries, and an entry contains a begin (BA) and an end address (EA) which 
define an area of the channel program whose CCWs have been checked already. 


After completion of the scanning procedure the locate list defines those areas 
of a channel program that have to be TFIXed. The entries describe isolated 
areas; they are not adjacent or overlapping, and are arranged in ascending 
sequence. 


Line Pointer Block 


Line pointer blocks are used for storing addresses of channel program areas 
during the scanning procedure. 

The line pointer blocks ensure that all lines of the channel program will be 
checked for fixing. 
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Layout of Locate List Blocks 


FRB Locate List Block 1 
[Soo Seoep tod 2 le ee Ee ? 
| FRBLLPTR }#-————>| BA1 | EA1 
b+ 
| BA2 | EA2 | 


|X'00 00 00 00'| | 


| Pointer to | 
{| next block | 


V Locate List Block 2 
| BA4 | EA4 | 
|X'00 00 00 00'| | 


{X'00 00 00 00'f | 
—— 
| | | 
| 4+ 
| Pointer to | 
| next block | 


LJ 


e 
s 
| 
Vv Locate List Block n 


Layout of Line Pointer Blocks 


FRB 


(oa ee Or 
| FRBLNPTR }—— 
eS 


er 


tipsy eee te SS 
>| Free Entry | Free Entry | 
| LP8 | LP7 | 
——— 
| LP6 | Pointer to | 
| Current Entry| 
| | in Block Fes 
ee ee 
| Pointer to | 
| Next Block | 
| 
V 
7 a a a 
| LP5 | LP4 | 
—— 
| LP8 | LP2 | 
SS 
| LP1 | Pointer to | 


| | Current Entry| 


| | in Block fe. 


|X'00 00 00 00'] 
ee a ee 


4-40 IBM VSE/Advanced Functions Handbook 


© Copyright IBM Corp. 1985 


aN 


Licensed Material - Property of IBM © Copyright IBM Corp. 1985 
Translation Control and Copy Blocks 


The following control and copy blocks are used to copy and translate a CCB and 
channel program for a virtual-mode I/0 request: 


¢ A CCB copy block. The user CCB and sense CCW (if any) are copied into this 
block. The CCB copy block also contains information about the copied and 
translated channel program. 


° A translation control block (CCWTCB). This is a work and save area, located 
in the CCW translation work area of the task control block (TCB) and used 
during translation. 


° CCW copy blocks. Each block contains copy locations for up to 7 contiguous 
CCWs and queueing information. 


© IDAL blocks used for building Indirect Data Address Lists for data areas 
which cross page boundaries. 


: Fix information blocks containing the page frame numbers of pages freed for 
this request. 


Control Block Structure for Fast CCW Translation (/370 Mode) 


{|A(2nd part) | 
SS 


Virtual Storage | Real Storage 
Se Se 
User Partition | Supervisor 
| REPLICA 
| Channel Queue Entry —— 7 
| a eS ° : 
Original CCB | | | | | {+--+ 
poe ad ieee mas mai pee | 
tt ie Te 
| | | CCB Copy Block | DIDAL 
| [ea cad eee Game 
| | r—|Copied CCB | IGA Cist) (<== 
| | i scene tcc en cae | 
aera 4 | fi 7 ° |@A(2nd)| —+—— | 
| ccW1 | | } fee pe eer, «lk || 
Sy || k<4 | | |@B is can oa Re 
_— CCW2 | | | om econ (0 | | 
ee | e e e e 
| -+ ccw3 1 | -t+ ot; |i. 
Lt Pee Tl il a 
| { | | | CCB Copy Block 
ae |) -——— V IDAL V 
| | | | |CCW1 | SS 
| | I/O Areas | }—__—____| | peeeoten. | ..+ 5 
ce eopemmaamenecn ah ot | Ccw2 =a. 3 
a ae | | ae an: ; ° . 
| -—__——__J | | CCW3 be. 1 
—— 
ne . ee 
JA(1st part) } -_—_—-- A. —.. ——__.- 
+—————1—{_ | Page Pool XS I/O Areas 
[A(2nd part)| | . cE | 
I 
4 a 
| |AC1ist part)| 
-1- 2K boundary | : |—-___1—_ 
e e 
| Beste Aa >| ‘ 
| | B | . 
| i—{<..4 
| 
| 
| 
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CCB Copy Block 


| a ene maS | T [Ne ees ee De we ew 
[i el) im od de adi Ge Ee le Se By es 
tf ——}—}—+— 
0| CCBCNT |ccB |ccB |ccB |ccB  |ccB |ccB | A 
| |cOMi1 |COM2 |STA1 |STA2 |CLS* |LNO | Copied 
io L | { ___1___.___|__-__} ccB 
8| CCBCCW | CCBBY3 | CCBCSWW | | 
| Address of first CCW | | | Vv 
16| CCBSENS | 
| Sense CCW if any | 
24| TID {CCB |Unused|CCBVA | 
| TASKID |Flag**| |Virtual address of CCB | 
— 
32| CCBACB | CCBICB | 
| Address of first CCW copy |Address of first IDAL block] 
| block in channel program |in channel program | 
| with lowest VBA | | 
- = 
40| CCBXINF (Fix information) | 
| Real page numbers of TFIXed pages | 
ee Gare Sata | 
64| CCBXPTR | #* |CCBNEXT Address of | 
| Address of additional | |next CCB copy block | 
| fix information block | xtso'] | 
| Loaeees recess ea | ] 
> * 


- Bit 2 is set (X'20') to indicate copied CCB 


we ~ Legend CCBFLAG: 


Bi 
0: 


ts Description 
Indicates that CCW-translation of this request is complete; indicator 
is set before 1/0 request is enqueued in channel queue. 


1: Indicates that control has been transferred to TFIX routine at least 
once during CCW translation; if 0, scan through CCBXINF for freeing 
pages is skipped; indicator is set immediately before control is 
passed to TFIX routine. 

2: Reserved. 

3: Indicates that the next CCW translation request from BTAM is from BTAM 
channel appendage. This indicator is set immediately after the first 
time a request from BTAM has been completed. 

4: Indicates that the channel program is valid for fast CCW translation 
(CCWs are contiguous, the requestor is not BTAM and it is not a system 
task request with an I/O area in the SVA). 

5: Indicates that this CCB copy block is on the saved CCB queue. 

6: Indicates that the pages containing I/O areas for this channel program 
require fixing. 

7: Reserved. 

e wk - 'Block in use’ indicator. 


Note:If the fast CCW translation option is active, bytes 56-67 of the CCB copy 


block have a different meaning, as shown below: 

Bytes Description 

56 - 59: The address of the REPLICA block associated with this channel 
program. 

60 - 63: Pointer to the next CCB in the saved CCB queue used by the fast 
CCW translation routines. 

64 - 67: Pointer to the saved CCB queue. 


The fix information normally held in these locations is not required when fast 
CCW translation is active, as it is kept in the REPLICA for the channel program. 
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Translation Control Block (CCWTCB) 
CCWICB is a work and save area, located in the task control block (TCB) and used 


during translation. The format of the CCWICB is shown in the "CCW translating 
work area (/370 mode)" part of the TCB. 


CCW Copy Block 


( a ae ie (faa ooo ee GS wh oe Sa oe, I, Moy ol 
a oak ae oe So a ee” a (-o 
pa Mee 1 1 en i 4 

0| 1st Copy location for CCW | 
8| 2nd Copy location for CCW | 
f =| 
16| 3rd Copy location for CCW | 
| 

24| 4th Copy location for CCW | 


5th Copy location for CCW | 


40| 6th Copy location for CCW | 
' { 

48| 7th Copy location for CCW | 
f T T + 

56|X'80' | x‘'o00000' | Virtual address of first | 
| * | | CCW in copy block (VBA) | 

64|x'88' | x'000000' | we |Addr. of next CCW | 
| | |copy block in chain | 
| | | x'8o'| (ANB) 


a 


Notes: 


1. * X'80' indicates the end of the CCW copy locations in the block. It is 
replaced by a TIC (Transfer in channel command) if the 7th copy location 
contains a copied CCW with data- or command chaining. Bytes 57-59 will then 
point to the copy location of the CCW following the CCW in the 7th copy 
location. Bytes 56-59 will not be changed if the CCW in the 7th copy 
location is a TIC. 


2. ** X'88' indicates the last 8-byte entry in the block. It is replaced by a 
TIC if the CCW in the 7th copy location is a status modifier CCW. Bytes 
65-67 will then point to the copy location of the second CCW following the 
status modifier CCW. 


The CCW copy blocks for a translation are queued in order of increasing VBAs 
with the lowest one being pointed to by the field CCBACB in the CCB copy 
block. 


3. we X'80' ‘Copy block in use’ indicator. 


IDAL Blocks 


CCWs whose data areas cross 2K boundaries must have an IDAL (Indirect Data 
Address List) in the copied channel program. 


If a data area crosses a 2K boundary, the CCW is changed to show that an IDAL is 


used (bit 37 of the copied CCW is set) and the address of the IDAL is placed in 
the data address of the CCW. 
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Locating CCB Copy Blocks ie 
(Pointer in Low Core) 


os ea, ee ea 
| ACCWT -— 
| ee Ce eee 


v & 
— CCB Copy Blocks iv 


CCWTCB in TCB 
(if ccw Trans. active) 


| 


|X'80' | CCBNEXT}+—; 
+68 W————_L—___—___] | 


———-———— > 


om 


| SS 
{| TCBPTR | | TcBAccB [;—_ — ( 
i. Ia | . 
(Pointer to current TCB | | | | Ne 
in Low Core X'260') t_____.___J | | 
leceeunienetien 
Channel Queue Entry +68 |X'80'|CCBNEXT}H—, 
fei ey 
irae | 
| | | 
1 ie 
V 
eee > = 
| | 
+68 |X'80'|000000 | 
ear Leones 
Locating CCW Copy Blocks 
CCB Copy Blocks CCW Copy Blocks 
| | (ne ie 
}—_—_—___; | | {Block 1 
| CCBACB po | | 
ws boa 
| | [X'80'| ANB = |}—4 
inated DEE ere | 
+68|X'80' | CCBNEXT| | c 
rr — f 
e Vv Ne 
° S 
pete ‘ 
‘ | | 
| |Block 2 
more CCB copy blocks, if any | | 
bs 
|x'so'| ANB ;-— 
a | 
| a 
OO gee ee 
V 
a aa | 
The blocks are queued such that: | 
VBA VBA VBA | |Block 3 
Block 1 Block 2 Block 3 | 
|X'8o'[oo0000 | 
H ! 
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Relation of IDAL Blocks to other Blocks 


CCB Copy Blocks 


| ee eee, 


Notes: 


IDAL Blocks 
> 


i ee Se | Caneel | 
| | | |IDAL1 [IDAL1 | 
--—— | ° 
| | | |IDALL |IDAL1 | 
| | ->-—_}+——— 
| | | |IDAL2 |IDAL2 | 
——<—<—SS | 
| | | | |IDAL2 |IDAL2 | 
-}——_—___+——_-—-—+ | ef 
r—{ccBAcB. |CCBICB #§=,}_————-—————————>4 {IDAL2 |IDAL2 ~~ | 
SS | 
| | | 
are | 
e e | e | e 
ee | -——_}———__ 
| | | | [Note 1 | 
Pe | ro en [a | 
| 
| 
| 
| 


= 

| 

| 

| 

| 

| 

| 

| for] | | 
J 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 


|CCW1 (no IDAL) | 

|ccW2 (IDAL1) tf 
|CCW3 (no IDAL) | 

|CCW4 (IDAL2) — 
° ° 

| | VBA | 

| [X'80'|ANB | 


Single IDAL block 


CCW Copy Blocks 


+68 |X'80'| —“ 


— 


Double IDAL block 


ae 


request or zero 


| 
| 
| 
|t—— Address of next IDAL block for this 
| 
| 
| 


+140/X'co"| —— 
See ae 


the contents of X' 
X'80' Block in use 
X'40' Double copy 


co' being: 


block 


2. The X'OF' in the first byte of the 1lith IDAW indicates the end of the IDAWs 


for the block. 


seven free copy locations. 


In this case, the IDALCNT field in the CCWTCB would show 


3. The data area of CCW2 crosses three 2K boundaries (may be up to 8K) and the 
data area of CCW4 crosses five 2K boundaries (may be up to 12K). 
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Schematic Representation of Channel Program Translation 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
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|Virtual Storage| 


Vv 


User Partition 


Original CCB 


Se een 
| Real Storage | 


<g— 


Supervisor Area 


Channel Queue Entry 


| | | | SSS 
| | | | 
—— | | | 
| Original | V CCB Copy Block | 
Vv CCWs | can | 
-— | co Copied CCB | | 
[CCW |< |) ee 
or ae a | | | 
r{ Ccw2 | a ee SS || 
| -—-+ | [| | , ——J IDAL Block 
| |ccw3| be i? ey aa 
bp oes [Gh eee) ee a, Id aed | 
| MI, OR casera | Set il 
| V | | | | [s ci 1 l» iq 
———— | | | | i fy 
fi B | oe os re | | [> a> gl | | 
7 | I | . oo | 
> ——— | | a | | 
| (ist part)| | | CCW Copy Block { tL p_———HJ | 
L-A | L—> _-—_________, | | | 
| (2nd part) | | | ccW1 | | | | 
ae | SSS | | | 
| | Re | ccw2 [-—>4 | | 
re | | | eS ) | | 
a | | CCW3 -—- | 
2K {| | }-———__—___—__{ | | Page Pool | 
Boundary| ~——-++_______ { [| I/O Areas | 
| SSS eae 
| See ope Wk al cal | | 
| bs eee? ee | 
| [| | ee ae | [AC1. part)| | 
a me | 
| a S| 
| | CCW Copy Block |B | | 
| Sd | 
| | | |A(2. part) |< 
| | (Additional) | 
| | | | | 
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Doubleword Indirect Data List (D!IDAL) 


DIDAL Block DIDAL Entry 


-— 


[ T T 


ENTRY 1 | Virtual | Flag | Pointer to 


| 
| address | byte*! real loc. 
i 
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1 
| 
| 
ENTRY 2 | 
| 0 3.4 5 7 
ENTRY 3 | 
| «© * Flag Byte 
ENTRY 4 | Bits Description 
| oO Indicates that TFIXING is not 
| ENTRY 5 | necessary because the page has 
| | already been TFIXED for this 
ENTRY 6 | request. 
| 1-6 Reserved. 
| ENTRY 7 | 7 Indicates that TFIX request 
| | for this entry has been 
ENTRY 8 | completed. 
| ¢ ** Pointer to next DIDAL 
Reserved | CHAIN POINTER ** | (X'80000000' in last DIDAL). 
=) 


e #%% Real location (copied ir IDA 
word) that should contain the 


translated I/O area address. 


REPLICA Control! Blocks 


Main REPLICA Block 


| VCCBA | RCCBA | 
| TIMEST |REPPIK | REPLCNT |CCWSTRL | 
| REPDIDAL | | 
| CCB 
| | ccWl 
ccW1 | ccw2 
| CCW2 | CCW3 | 
CCW3 | REPFPT | 
REPBPT | ‘80 | REPNEXT 


Additional REPLICA Block 


— } 
| CCwW4 | 
| 
CccW5 | 
— 1 
| | 
{ { 
SR ae | 
REPBPT |x'so'| REPNEXT | 
L i i EER Sire ee) 
VCCBA Virtual CCB address. RCCBA Address of copied CCB. 
TIMEST Timestamp. REPPIK Partition identification kev. 
REPLCNT The number of tasks currently testing this REPLICA for a match 
with their channel program. 
CCWSTRL Length of CCW string (number of CCWs). 
REPDIDAL Address of DIDAL block. 
REPFPT Forward pointer used for chaining REPLICAs. 
REPBPT Backward pointer, used for chaining REPLICAs. 
REPNEXT Pointer to (next) additional REPLICA block. 
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REPLICA Blocks 


REPLICA blocks are needed to save the channel program and related information. 
The first two REPLICA blocks are REPLICA Header Blocks (RHB1+2). 


Layout of REPLICA Header Blocks for a CCB 


RHB1 
f.o2 += / T 71 
| (See Note)|Number of | PIK of | 
0 |Flag Byte |Tests on | Requester | 
| | REPLICA | 
} ererearne | | 
4 | Forward pointer in partition's | 
| REPLICA queue | 
areace | 
8 | Backward pointer in partition's | 
| REPLICA queue 
| 


12| Address of virtual CCB 

| | 
| | 
| | 
| Saved CCB | 
| | 
| | 
| | 


32| Pointer to RHB2 | 
Le Fe 


RHB2 


f- ,2 3's te) ee Ne ee, oe Gl 
0 | Pointer to RHB1 | 


4 | Pointer to associated FHB | 
| (fixlist) | 
Se 

8 | Time stamp 


12| Length of saved channel program | 
| 

1 

16 Reserved | 
4 

20 Reserved | 
IL : 
24 | 
Saved user SENSE | 

| | 

t 
32| Pointer to next REPLICA block | 
L i 


REPLICA Block 


0| CcW1 | 
SSS SS 

8 | ccw2 | 
= zi 

16 | CCW3 | 
aes 
24| CCW4 | 
Sa Pa 


32| Pointer to next| 


| block or zero | 
fis A dy 


Note: 
Bit O=1 Freeing of REPLICA requested. 
Bits 1-7 Reserved. 
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Layout of REPLICA Header Blocks for an IORB 


RHB1 
ST 1 
| (See Note)|Number of | PIK of | 
O|Flag Byte |Tests on | Requester | 
| [REPLICA | | 
4 = 


4| Forward pointer in partition's IORB | 
| REPLICA queue | 
8| Backward pointer in partition's IORB| 
| REPLICA queue 


12| Reserved 


16| First user fixlist entry | 
| | 
= 4 
24| Second user fixlist entry | 
| | 
| | 
| | 
f { 
32| Pointer to RHB2 | 
be | 


RHB2 


[Spree A Ney gage Ne eh ee a 
O| Pointer to RHB1 | 


4| Pointer to associated FHB | 
| (fixlist) | 
a na rT 


8| Time stamp | 


| 


12] Length of saved channel program | 
OH 


16| Third user fixlist entry | 


| 
| | 
| 
Se 


24| Fourth user fixlist entry | 
| | 
| | 
| “4 
32| Pointer to next REPLICA block | 
eee a 


REPLICA Block 


f 
0| Fifth user fixlist entry | 


Ba ee 


8| Sixth user fixlist entry | 
16| Seventh user fixlist entry | 


24| Eighth user fixlist entry | 
J 

T 

32| Pointer to next| 


| block or zero | 
ee et at 


Notes: 


° Bit Q=1 Freeing of REPLICA requested. 
. Bits 1-7 Reserved. 
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PARTITION CONTROL BLOCKS (PIB, PIB2, PCB) 


PIB (Partition Information Block} 
PIB2 (Partition Information Block Extension) 
PCB (Partition Control Block) 


Partition Control Blocks Interrelationship 


COMREG 
0 5A 5B 7¢ 7D 
tT wi, oe ee = lesa on ae ele Se 
| eee PIBPT | eeccccen | PIB2PTR | coe 
(eee 
| | 
| | 
— J é Za 
| | 
| | 
| | PIB2TAB 
VV PIBTAB vo 8 F PCB 
na | Pe ee Ree ra | 
| SYS | |  sys|-++4 >| SYS | 
be a 
| Be | | Bej-+-—+— >| ae 
+ 4+ /—— 
| om | | Fnl-++ >| om | 
J ba a 
° 2 e 
e se e 
e s e 
° e e 
——— re ot ak acne caer 
| F1 | | Fl] | | | EL 
(ee es eee ty eee eee ee fi Soe Sy 
| 
| | 
pie tal i 
| 
a) 18 1B 20 3F | 
T ral T | 
| TSS | | TIDSTR | 
aif a eee Wes j 
Notes: 
1. Fn = Foreground partition "n" 
2. @ = Address 
3. @(FnPIB) = @(PIBTAB) + FnPIK 
4. @(CFnPIB2) = @(PIB2TAB) + FnPIK 
5. @(@(FnPCB)) = @(FnPIB2) + 8 


The PIB, the PIB2 and the PCB contain static and dynamic status information 
about the system and about partitions. There is one set of these control blocks 
for the system and one for each partition generated (NPARTS specification). 
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{> Sip cs @ ses aa feed a | 
| Bytes | | | 
| Dec Hex | Label | Description | 
ies | ! 
| ) 0 | PIBSTATE | Partition status byte | 
i | STOPPED | X'82' Partition is stopped | 
| | INACT | 80 Partition is inactive/unbatched| 
| | {| 00 Partition is active | 
| 1 1 | PIBOLDST | Maintask status at operator | 
| | | cancel time | 
| 2-3 2-3 | PIBLOGID | SYSLOG ID (AR,BG,Fl,...,Fn) i 
[| 4 4 | PIBFLAGO | Flag byte | 
| | TRAM | X'80' Partition running in virt. mode] 
| | | 40 Reserved 

| | | 20 Reserved 

| | | 10 Reserved | 
| | | 08 Reserved 

| | | 04 Reserved 

| | {| 02 Reserved 

| | | O21 Reserved 

| 5-7 5-7 | PIBPBEG | Begin address of virtual partition 

| 8 8 | | Reserved 

| 9-11 9-B | PIBSAV2 | Problem Program save area of 

| | | LTA owner (system PIB) 

| 12 C | PIBFLAGi | Flag byte 

| | | X'80' Reserved 

| | APPEN | 40 Channel appendage allowed | 
| | | 20 Reserved 

| | | 10 Reserved 

| | | 08 Foregr. assignments to be hold | 
| | | 04 Reserved | 
| | 02 Reserved 

| | | O01 Reserved | 
| 13 D {| PIBLUBID | Number of System LUBs 

| | | (AR PIB: Number of BG system LUBs ) | 
{| 14 E | PIBLUBNO | Number of Progr.LUBs | 
| | | (AR PIB: Number of BG progr. LUBs )_ | 
| 415 F | PIBFLAG2 | Flag byte | 
| | | X'80' Reserved | 
| | | 40 Reserved | 
| | JOBDUN | 20 End of Job indicator | 
| { | 10 Partition stopped | 
| | | (set by Job Control) | 
| | | 08 Reserved | 
| | | 04 Reserved | 
| | | 02 Reserved i 
| | | 01 Reserved | 
L 1 i | 


The address of PIBTAB can be found in bytes 90-91 (X'5A'-X'5B') of the Partition 


Communication Region. 


The first entry of the table belongs to the system. 
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Partition Information Block Extension (P!B2) 


i Bytes 
| Dec Hex | Label | Description | 


| 0-1 0-1 | PIBCOMRA | Address of Communication Region | 
| | | (AR PIB: BG COMREG) | 
f 2-3 2-3 | SYSLUBX | Index of System LUBs relative | 
| | | to LUB table (always 0) | 
| 4-5 4-5 | PIBMTID | Task ID of main task | 
| 6-7 6-7 | | Reserved | 
| 8-11 8-B | APCB | Address of Partition Control Block | 
| | | (PCB) | 
| 12-13 c-D | PIBPIK | PIK of partition (0 for AR PIB2) | 
| 14-15 E-F | | Bytes 2 and 3 of ECB for ATTACH | 
| | | limit within partition | 
{ 15 F | PIBFLG3 | Extension flags | 


The address of the PIB2TAB can be found in bytes 124-125 (X'7C'-'X7D') of the 
partition communication region (COMREG). 


The first entry of the table belongs to the system. 


The PIB/PIB2 for a given partition is found by adding the PIK of this partition 
to the begin address of the appropriate table. 
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Partition Control Block (PCB) 


hens op een ee FO te ees ORGS SN PO OO ea 


| Bytes | | | 
| Dec Hex | Label | Description 
Pf 
0-1 0-1 PCBLNGTH Length of PCB | 
2 2 PCBFLAG Flag byte | 
BALANCED X'80" Balanced partition 
PERACT 40 Reserved 
SUPPRPFH 20 Suspend page fault handling 
(load leveller) 
10 Reserved 
08 Reserved 
04 Reserved | 
02 Reserved 
PWSRVFLG 01 Some task within partition 
waiting for POWER 
3 3 Reserved 
4-7 4-7 PCBPMASK Partition priority mask 
8-11 8-B RUNTIME Time counter for part.balancing 
PBALTIME Initial value of part.balancing time 


PCB pointer for time accounting 
PCBPIK 
PCBLCTSS 
PCBSUBS 
TSS 


PIK of partition 

Active length code for TIDSTR 
Number of attached subtasks 
Task selection bit string 


28-31 1C-1F 

32-63 20-3F TIDSTR TID's of attached tasks in priority 
order 

64-67 40-43 Reserved 


PCBNTASK 
CDLDTID 
CDLDBYTE 


Counter of used subtasks 

TID of CDLOAD owner within partition 
Significant portion of CDLDTID 
PCBPSCB SCB pointer of allocation space 
PCBASCB SCB pointer of active space 

eee ereer pera Beein of SMCB ics ei 2.ad sawn oe bbe dk boa tue hades | 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| and job accounting 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| | 
16-19 10-13 | PCBJAPTR | 

| 

| | 

| | 

| | 

| Reserved | 

| | 

| | 

| | 

| | 

| | 

| | 

| | 

| | 


| 80-81 50-51 | SMAXPFIX | PFIX limit in pages | 
| | | (system PCB: SVA PFIX limit) | 
| 82-83 52-53 | SMPFIX | PFIX count in pages | 
| | (system PCB: SVA PFIX count) | 
| 84-87 54-57 | SMPSAVE | Partition PCB: Address of | 
| | | main task save area | 
| | PCBAPBEG | = Active partition begin address 

| 88 58 | SMVFLAG | Storage management flag byte | 
| | | X'80' SETLIMIT given indicator | 
| | | 40 Reserved 

| | | 20 Reserved 

| | | 10 Reserved | 
| | | 08 Reserved | 
| | {| O04 Reserved | 
| | | 02 Reserved 

| | | O01 Reserved | 
| 88-91 58-5B | SMVGVIS | Partition PCB: Addr. of GETVIS area | 
| | SMSGVIS | System PCB: Address of system | 
| | | GETVIS area | 
| 92-95 5C-5F | SMVPBEG | Partition PCB: Begin of virtual | 
| | el ll partition | 
| | SMSVABEG | System PCB: Begin of SVA | 
| 96-99 60-63 | SMVPEND | Partition PCB: End of virtual | 
| | | partition + 1 | 
| | SMSVAEND | System PCB: End of SVA + 1 | 
| 100-103 64-67 | SMRPBEG | Partition PCB: Begin of real part. | 
| | | System PCB: Begin of real area 

| | | for system PFIX | 
| 104-107 68-6B | SMRPEND | Partition PCB: End of real part. + 1 | 
| | | System PCB: End of real area | 
| | | for system PFIX +1 | 
| (28) (1C) | SMCBLNG | Length of SMCB | 
| 5, ahecevtcaeefeaestees 9 ENG: OF: SMGB™ sare cchsevecde wena cea des a desea an aeiid oases eae | 
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Partition Control Block (PCB) (cont...) 


| Bytes 
Dec Hex 


108-111 6C-6F 


112 70 
113 71 
114 72 


115 73 


4116-121 74-79 
116-119 74-77 
120-121 78-79 


124-127 7C-7F 
128-131 80-83 


132-139 84—-8B 
140-147 8€-93 
148-155 94-9B 
156-163 9C-—A3 


162 A2 
164-171 A4—AB 
170 AA 
172-179 AC-B3 
178 B2 
180-183 B4—B7 


184 B8 


| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

t 

| 

| 

| 

| 

| 

{ 122-123 7A-7B 
| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

{ 

| 

| 

| 

| 

| 

| 184-187 B8—BB 
| 188-191 BC-BF 
| 

| 184-192 B8-CO 
| 193-194 C1-C2 
{ 195 C3 

| (196) = (C4) 
| 196-215 C4—D7 


Label 
PCBAPEND 
PCBSSCNT 


PCBSSFL1 


NPDA 
PCBSSFLG 
PWR 
VTAM 
ICCF 
CcIcs 
VCNA 
OCCF 
DS2 

SSX 
CHPTENT 
CHPTPAGE 
CHPTCNT 


PCBOCPTR 
PCBOCSAV 


PCPUTIME 
POVHTIME 
PBNDTIME 
PCBRQ 
SRQGTV 
PCBRBGTV 
SRQCDL 
PCBRBCDL 
SRQPFX 
PCBRBPFX 
PCBCNT 


FIXTYPE 
GTRBIT 
RSTRTBIT 


FIXTIB 
PFTERSVD 


| | 


| Description i 


| End address + 1 of user key area | 
| within partition | 
| Subsystem counter within partition | 
| Reserved | 
| Subsystem flag byte | 
| X'80' Reserved } 
| 40 Reserved | 
| 20 Reserved | 
| 10 Reserved | 
I 08 Reserved | 
| 04 Reserved { 
i 02 Reserved 
| O41 NPDA partition | 
{ Subsystem flag byte | 
| X'80' POWER partition | 
{ 40 VTAM partition | 
| 20 ICCF partition | 
| 10 GICS partition | 
| 08 VCNA partition | 
| 04 OCCF partition | 
{| 02 DS2 partition | 
{ 01 SSX partition | 
| Checkpoint PFIX entry | 
| First PFIXCHPT page not yet handled | 
| Remaining number of PFIX-ed pages for| 
| PFIXCHPT | 
| Reserved | 
| Address of OC exit routine | 
| (partition PCB only) | 
{| Address of OC exit save area | 
| (partition PCB only) { 
{| CPU time counter | 
| Overhead time counter | 
| Allbound time counter | 
| Begin of PCB resource descriptors | 
| GETVIS/FREEVIS resource queue header | 
| GETVIS/FREEVIS resource byte | 
| CDLOAD resource queue header | 
| CDLOAD resource byte } 
| PFIX resource queue header | 
| PFIX resource byte | 
| Address of usage and SIO counters | 
| for partition sharable devices | 
| PFIX flag byte | 
| X'80" GETREAL request | 
{| 40 PFIXREST request | 
| 20 Reserved | 
10 Reserved | 
| 08 Reserved | 
| 04 Reserved 

| 02 Reserved | 
| 01 Reserved 

| TIB pointer of PFIX/GETREAL requestor | 
| Address of reserved PFTE for 

| PFIX/GETREAL | 


of system PCB ......... ob Viscaia Gen 6. aht goat chai ateveehsnciecertetee | 


PCBPFIXL 


PCBVTCNT 
PCBVMLNG 
PHOTIB 


| Count of tasks with open VTAM ACBs | 
| Reserved | 
| Count of tasks with open VTAM ACBs_ | 
| Length of PCB for VM | 
| Pseudo-TIB for PHO 
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Task Information Block (T1IB) 


12 


48 


Hex | Label 


TIBCHAIN 


TIBSTATE 


TIBFLAG1 
PHOIND 
PHOACT 
PHOREQ 


| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| EOTACT 

| VIOREQ 

| EOTINPR 

| LTAACT 

| LTAOWNER 

| TERMACT 

| SYSACT 

| PRIVILEG 

| TIBTCB 

| TIBPFAPP 

| TIBVIOTB 
c | PGQTYP 

| PGSEL 

| PGNCNT 

| PGO 

| PGOWAIT 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

n 

| 

| 

| 


PGOPGIN 


PGOVIO 
PGINF 


TIBRTID 


TIBRBYTE 
TIBRPIK 


TIBPFLNG 
d of Pseudo— 

TIBPCB 

TIBPMASK 


1c TIBFLAG 
| CSVRET 

| RETRYSVC 
TIBDELMV 
FETCHEOJ 


| ROLLOUT 
| CDELEX 
| OCPEND 


| APSEXFLG 


30 TIBLNG 
ne ee 
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| 


Description | 


Wait chain indicator | 
X'00' Task is enqueued in wait chain | 
FF Last TIB in resource wait chain| 
Pointer to next TIB in a | 
resource wait chain | 
Resource identifier within | 
generic wait chain | 
Flag byte | 
X'80' Pseudo-TIB for PHO or VIO [ 
40 PHO initialized for this task | 
40 (PHO TIB only) | 
PHO request enqueued | 

20 EOT active | 
20 VIO pseudo-TIB (if PHOIND on) | 
10 EOT subsystem clean-up active | 
08 LTA active | 
04 LTA owner | 
02 Terminator active | 
01 System code active | 
1B | 
TCB pointer | 
PHO TIB: Address of PHO appendage | 
VIO TIB: VIOTAB pointer | 
Type of page I/O request | 
X'80' Page selection required | 
40 Counting already done | 
10 Page-out request | 
18 Page-out request with | 
waiting task | 

14 Page-out request with waiting | 
Page-in | 

12 Asynchr. Page-out requ. for VIO} 
Address of PDS device control block | 
or of PFTE | 
User tasks: Task ID | 
Syst.tasks: Task ID of service owner | 
PHO TIB: Task ID of PHO owner | 
within partition | 
Significant byte of TIBRTID | 
User tasks: PIK of owner partition | 
Syst.Tasks: PIK of serviced partition| 
Length of PHO/VIO TIB 


TBS ssid card cinco de Sexe ee See eee wees | 


Pointer to PCB of owner partition 
Priority mask of task | 
within partition | 
Dispatcher exit flags 
X'80' Return to supervisor routine 
40 Restart SVC pre-processing | 
20 General delayed move processing] 
10 Task termination to be 
initialized 
08 ICCF inter.part. eligible 
for roll-out 
04 Delayed timer interrupt 
processing 
02 OC exit to be scheduled 
O01 Call VTAM exit 
Length of TIB 
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Task Information Block (TIB) (cont...) 


== ea og ee a ee ee 


| Bytes | | | 
| Dec Hex | Label | Description | 
ba 
| 29 1D | TIBFLAG2 | Flag byte | 
| | ICCFPP | X'80' ICCF Interactive Partition | 
| | PWRMTASK | 40 POWER main task | 
| | OVHIND | 20 Account CPU-time as overhead | 
| | SVPCCNCL [| 10 Status saved in special | 
| | | save area | 
| | OCCFACT | 08 OCCF service request pending | 
| | ASYOCACT | 04 ASYNOC request pending | 
| | VTOPEN | 02 At least one VTAM ACB open | 
| | LIBRSERA | 01 Librarian service active | 
| 30 1E | TIBCNCL | First cancel code | 
| 31 1F | TIBCNCL2 | Last cancel code | 
| | TERMCNL | X'80' Terminator canceled | 
| 32 20 | TIBRQID | Task status flag | 
| 33 21 | TIBFLAG3 | Flag byte | 
| | | X'80' Reserved | 
| | | 40 Reserved | 
| | | 20 Reserved | 
| | SEIZEBIT | 10 Task is seizing the system | 
| | | (see SVC-16) | 
| | | 08 Reserved | 
| | | 04 Reserved | 
| | | 02 Reserved | 
| | |. O1 Reserved | 
| 34 22 | TIBCNCL3 | Terminator cancel code | 
| 35 23 | TIBDMFLG | Del. move flag, used with TIBDELMV | 
| | TIBCMVEX | X'80' Invoke CCB delayed posting | 
| | TIBXPCEX | 40 Invoke XPCC delayed move exit | 
| | TIBSFLEX | 20 Return to SYSFIL FBA processing| 
| | TIBPERST | 10 Invoke PER bit update | 
| | TIBDMALL | FO Invoke previous services | 
| | | 08 Reserved | 
| | | 04 Reserved | 
| | | 02 Reserved | 
| | | O11 Reserved | 
| 36-41 24-29 | TIBITREQ | Significant part of timer interrupt | 
| 42-43  2A-2B | TIBITCHN | Address of Y—pointer to next | 
| | | TIB in IT chain | 
| 44-47  2C~-2F | TIBSCB | Current SCB pointer for task | 
|—______- 1 ere 
| 48 30 | TIBLNG | Length of TIB | 
AS ee \ wel 
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Task Control Block (TCB) 


| Bytes | 

| Dec Hex | Label | Description 

| 0-1 0-1 | TCBLNGTH | Length of TCB 

| 2 2 | TCBAUTHF | Authorization flag 

| | TCBFLAG3 | 

| | | X'80' Reserved 

| | | 40 Reserved 

| | CICSMT | 20 CICS 'maintask'’ from SUBSID 
| | DLIMT | 10 DLI ‘maintask' from SUBSID 
| | ISPFMT | 08 ISPF 'maintask' from SUBSID 
| | FTPTSK | 04 FTP task allowed to use CPCOM 
| | | 02 Reserved 

| | | O1 Reserved 

| 3 3 | TCBRID | RID saved on interrupt in supervisor 
| | service 

{| 4-5 4-5 | FATHERID | Task ID of attaching task 

| | | (user subtask only) 

| 6 6 | TCBFLAGS | Flag byte 

| | SYSRESW | X'80' DASD File Protect to be skipped 
| SKIPMSG | 40 OPTION=NODUMP for STXIT AB 

| | EARLYAB | 20 OPTION=EARLY for STXIT AB 

| | ACLOSE | 10 VSAM Automatic Close 

| | | in progress 

| | VSMOPEN | 08 VSAM ACB'S open in partition 
| | | (set for main tasks and 

| | | ICCF IP's) 

| | | 04 Reserved 

| | ICCFSvC | 02 ICCF SVC screening flag 

| OWNTIMER | 01 Task Timer owner 

| | | (main task only) 

| 7 7 | TCBFLAG2 | Flag byte 

| | CNCLRTRN | X'80' Terminator to be reentered 

| | | 40 Reserved 

H | | 20 Reserved 

| | OPENSVA | 10 OPEN active in SVA 

| | SELFTERM [{ 08 Task terminating by itself 

| | | (EOJ, CANCEL, DUMP, JDUMP, 

| | DETACH by user code) 

| | | 04 Reserved 

| | CNCLALL | 02 CANCEL ALL request 

| | NOPAGING | 01 No page faults allowed 

| | | (system tasks) 

| 8-11 8-B | TCBTIB | TIB pointer 

| 12-15 C-F | TCBSAVE | Address of current save area 

| 16-19 10-13 | INTINFO | Saved interrupt information 

| 19 13 | svciIc | SVC interruption code 

| 20-23 14-17 | AERREXIT | Address of cancel exit 

| | | (used for system tasks only) 

| 24-27  18-1B | TCBERBLK | Address of head queue error entry 
| | | (system tasks only) 

| 28-31 1C-1F | TCBSAV2 | Address of second save area 
ere End of TCB for system tasks without second save area ...... 
| 24-103 18-67 | TCBSSAVE | Second save area 

| 104-251 68-FB | | TCB work area (FETCH, 

| CCW Translation, 
| | | CCW fixing, 

| | SVC) 

| 252-255 FC-FF | TCBCINF Fetch cancel information 

| | TCBCALIB | Pointer to library name 

| 256-259 100-103 | TCBCASLB | Pointer to sublibrary name 

| 260-263 104-107 | TCBCANAM Pointer to phase name 

| 264-267 108-10B | Used for move mode 

| (268) (10C) | TCBWLEN {| Total length of TCB work area 
|stiticcaearadtd arerdatest End of TCB for system tasks without exits.......... 
— cea 
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Task Control Block (TCB) (cont...) 


| Bytes 


Dec 


268-299 
268 


268-271 
272-275 
276-283 
284 
284-287 


288-291 
292 


292-295 
296-299 
300-303 


304 


305-307 
308-311 
308 
309-311 


312-315 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 316 
| 

| 

| 

| 

| 

| 

| 

| 

| 


317-319 
320-323 


324-325 
| 

| 326-327 
| 328-331 
| (332) 
| 

| 


ee ete ee ne 


| 336-455 


| (446) 


Hex 
10C—-12B 
10C 


10C-10F 
110-113 
114-11B 


116 
11C-11F 


120-123 
124 


124-127 
128-12B 
12C—12F 


130 


131-133 
134-137 
134 


135-137 
138-13B 
13¢ 


13D-13F 
140-143 


144-145 


146-147 
148-14B 
(14C) 


14C-14F 


150-1C7 


(18) 


En 
En 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


d 
d 


Label 
TCBEXTAB 


EXITACT 

TCBABPTR 
TCBABSAV 
TCBABSEC 


EXITACT 
TCBPCPTR 
TCBPCSAV 


EXITACT 
DELINT 
TCBITPTR 
TCBITSAV 
TCBEOTAD 
VTAMBGIN 
APSFLAG 


VTLTDLY 


VTAMEND 


APSCNT 


VTPCINF 
VTAMFLG 
VTABEND: 


VTSPSAV 
VTCDLY 
VTAPDEL 


VTURX 
VTSVC 
VTAPP 
VTAMKO 
TCBECB 
TCBSPOFF 


TCBCRCBC 
TCBLNG 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


Description | 


AB, IT, PC exit information 
AB exit flag byte 
X'80' AB exit routine active 
Address of AB exit routine 
Address of AB exit save area 
Address and save area of secondary 
AB exit 
PC exit flag byte 
X'80' PC exit routine active 
Address of PC exit routine 
Address of PC exit save area 
IT exit flag byte 
X'80' IT exit routine active 

40 IT intérrupt processing delayed 
Address of IT exit routine 
Address of IT exit save area 
Continuation address for End of 
Task clean—up 
AR TCB: Begin address of VTAM 
partition (set by VTAM) 
Flag byte 
X'80 — 40' Reserved 

20 VTAM user exit delayed while 

task owns the LTA 

10 — 01 Reserved 

User task TCB: Pointer to VTAM APT 
(set/used by VTAM) 
AR TCB: End address of VTAM partition 
(set by VTAM) 


(maintained by VTAM) 
Reserved for VTAM 
Program check information (VTAM) 
Flag byte 
X'80' AR TCB: TPBAL issued 
(set by VTAM) 
User task TCB: Abnormal term. 
of a VTAM process 
40 PSW + registers in SVPCSAVE 
20 Cancel delayed for VTAM 
10 VTAM AP exit delayed while 
terminator is active 
08 VTAM user exit in control 
04 VTAM SVC active 
02 VTAM process active 
01 Key 0 / supervisor state 
required for VTAM 
Reserved 
Address of ATTACH ECB 
(used only for user subtasks) 
Identification of dedicated 
GETVIS subpool 
Reserved 
Anchor of CRCB chain (XPCC exit) 
Length of AR and main task TCB 


of user main task TCBs ............ 2. cece eee eee 


TCBSTADR 


| 
| 


Address of system task deactivation 
routine 


of TCBs for system tasks with exits ............. 


TCBUSAVE 


STCBLNG 


| 
| 
| 


Subtask save area in case of 
ATTACH without SAVE 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
{ 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
Count of open VTAM ACBs | 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
Length of subtask's TCB 


End: of. subtask"s: TOBis.ads-sic ed Felaaieacetvew a tuiodwen | 


4-58 IBM VSE/Advanced Functions Handbook 


Ee IK 


Lo, 


Licensed Material - Property of IBM 


Task Control Block (TCB) (cont...) 


Label 


104-143 68-8F 
144-147 90-93 
148-151 94-97 
152-155 98-9B 


156 9C 
157 9D 
158 9E 
159 9F 
160-163 A0-A3 
164 A4 


165-167 AS—A7 
168-175 A8-AF 
176 BO 
177 Bl 
178-179 B2-B3 
180-183 B4-B7 
184-185 B8-B9 
186-187 BA-BB 
188 BC 
189 BD 
190-191 BE-BF 
192-195 C0-C3 
196-199 C4-C7 
200-203 C8-CB 
204-207 CC-CF 
208-209 DO-D1 
210-215 D2-D7 
216-223 D8-DF 
224-227 EQO~-E3 
228-231 E4-E7 
232-235 E8-EB 
236-239 EC-EF 
(240) (FO) 
| 240-243 FO-F3 
| 244-247 F4-F7 
248-251 F8-FB 
(148) = (94) 


FETCH work area 
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Description | 


Sa ee ee 


DFCBSAV 
DFWKLPNT 
DFWKEPNT 
DFWKUSEN 
DFCBSW1 
FIRSTDIR 
INVUSEN 
FLABMASK 
USERMASK 
NODEVALD 
PARTLOAD 
REALMASK 
SYSAMASK 
DFCBSW2 
FIXPAG 
USERDUPD 
GENINT 
FIXTXT 
ACTDIR 
LASTTBL 
IDERR 
FLNKVIO 
DFWKRCOD 


DFWKPHPT 
DFWKFLAG 
FLRETCOD 
SVAUPD 
SDLUPD 


SDLFORM 
SYSLIST 
DENTRY 
NTXTNTRY 
DFWKLIST 
DFWKNAME 
DFWKEGEN 


DFWKERBA 
DFWKECON 


DFWKESWT 
DFWKEMVS 


DFWKEPLN 
DFWKELPL 
DFWKEEPL 
DFWKEBGP 
DFWKERLD 
DFWKERDA 


DFWKEVLE 
DFWKLBID 
DFWKALIB 
DFWKASLB 
DFWKEND 
DFWKANAM 
DFWKCOMG 
ANCSAV 
LFCHWORK 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
{ 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


Save 
Phas 
Phas 


wen ae kgs, Ria dhe adh debe de eed ay acdsee a Res ew | 
area (Registers 0-2 ,8-14) 

e load point 

e entry point 


Pointer to user's directory entry 


Flag 
X'80 
40 


O1 
Flag 
X'80 

40 

20 

10 

08 

04 

02 

O1 
Retu 
Rese 
Addr 


byte 
' First directory record 
Invalid local list 


User task 

No validation required 

Load into partition 

Request for real partition 
System task request 
byte 

Pageable FETCH part is fixed 
Update user directory entry 
CCW generation area exhausted 
Area for phase read in is fixed 
Directory entry active 

Last text block is read in 

ID mismatch during dir. read 
LNKEDT with option LINK 
rn code 
rved 
ess of phase name 


t 


Option byte 


X' 80 
40 


O01 
Poin 
Phas 
Rese 
Phas 
Offs 
Rela 
Numb 
Rese 
Indi 
Stat 
Rese 
Leng 


" Return code required 
Load/update SVA phase 


Reserved 
Directory entry has SDL format 
Search SYSLIB first 
Directory entry option 
No text load option 

ter to local list 

e name 

rved 

e attributes 

et of PRBA-ADDR 

tive block address 

er of contiguous blocks 

rved 

cators 

us MOVE-MODE 

rved 

th of phase in bytes 


Load point at LNKEDT time 


Entr 
Part 
Numb 


y point at LNKEDT time 
. Start address at LNKEDT time 
er of RLD items 


PRBA of RLD item 


Rese 


rved 


Entry point in SVA 


Libr 


arian identifier of phase 


Address of Library Definition Table 


Addr 
End 

Addr 
Poin 
Poin 
Leng 


Chapter 4. 


. of Sublibrary Definition Table 
of DE layout 

ess phase name 

ter to actual COMREG 

ter to Anchor table 

th of fetch work area 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
[ 
| 
Update SDL | 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
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f 7 ~— 1 
| Bytes | | | 
| Dec Hex | Label | Description | 
/— + +- + 
[aeers ee Rachie ens cens CCW Translation work area (/370 mode) ............006 | 
| 104 68 | TCBFLAG | Flag byte | 
| | TCBDC | X'80' Data chaining | 
| | TCBRDS | 40 Read/Sense command | 
| | TCBRDB {| 20 Read Backward command | 
| | TCBSM1 | 10 Status modifier command and | 
| | | command chaining | 
| | TCBSM2 | 08 Status modifier command | 
| | FXGETBL | 04 Request for FIXINF block | 
| | CHKSTM | 02 Check status modifier 1287/3890] 
| | GETDCBL | 01 Double copy block request | 
| 105 69 | ADBTAMCB | No. of addit. blocks needed by BTAM | 
| 106 6A | | Reserved | 
| 107 6B | CCWTIFLG2 | CCW-Translation second flag byte | 
| | CCWIFIDA | X'80' Fix IDAL request | 
| | CCWTPAF | 40 Page already fixed | 
| | {| 20 Reserved | 
| | | 10 Reserved | 
| | | 08 Reserved | 
| | | 04 Reserved | 
| | | 02 Reserved | 
| | {| O1 Reserved | 
| 108-111 6C-6F | DEVSTPTR Pointer to status modifier list | 
| 112-115 70-73 | DEVCDPTR | Pointer to control command list | 
| 116-119 74-77 | LINEPTR Pointer to next line | 
| 120-123 78-7B | BENDPTR | Block end pointer | 
124-127 7C-7F | TCBACCB | Address of copied CCB | 

| 128-131 80-83 | IDALCNT Number of free IDAL's | 
| 132-139 84-8B | DYNAREA1 Dynamic save area | 
140-147 8B-93 | DYNAREA2 | Dynamic save area 

| 148-151 94-97 | DYNAREA3 Dynamic save area | 
| 152-155 98-9B | DYNAREA6 | Dynamic save area | 
136-159 9C-9F | DYNAREA7 | Dynamic save area | 
160-163 AO-A3 | FIXADDR | Address of last TFIX request | 

| 164-167 A4-A7 | CCWTFREP Address of free fix list entry | 
168-171 A8-AB | TCBDCB | Pointer to DIDAL block chain FASTTR | 
172-175 AB-AF | DDALBLAD | Address of current DIDAL block FASTTR]| 

| 176 BO. | ‘TCBFLAG! | Flag byte FASTTR| 
| | RFALG X'80' REPLICA creation request FASTTR| 
| | 40 Reserved | 

| | REPLCR | 20 REPLICA block request  FASTTR| 
| | DIDALCR 10 Request for DIDAL block FASTTR| 
| | | 08 Reserved | 
| | | 04 Reserved | 
| | 02 Reserved | 
| | | O01 Reserved | 
| 177 Bl | | Reserved FASTTR| 
| 178-179 B2-B3 | DIDALCNT | No. of free DIDAL double words FASTTR]| 
| 180-183 B4-B7 | DIDAWAD | Address of current DIDAL FASTTR| 
| | | double word FASTTR| 
| 184-187 B8-BB | VCCWAD1 | Stored virtual CCW address FASTTR | 
| 188-215 BC-D7 | SAVEREG2 | Save area for registers 2-8 | 
| 216-219 D8-DB | SAVEREG9 | Save area for register 9 | 
220-223 DC-DF | SAVEREGA | Save area for register 10 | 
224-227 EO-E3 | SAVEREGB | Save area for register 11 | 

| 228-231 E4-E7 | SAVEREGC | Save area for register 12 | 
| 232-235 E8~EB | SAVEREGD | Save area for register 13 { 
| 236-239 EC-EF | SAVEREGD | Save area for register 14 | 
240-243 FO-F3 | SAVEREGD | Save area for register 15 | 

| (140) (8C) | LCCWTAR | Length of CCW Translation work area | 
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Task Control Block (TCB) (cont...) 
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Ps 7 a we Tiina 92 

| Bytes | | 

| Dec Hex | Label | Description 

' —— 

eee ae eee CCW Fixing work area (ECPS:VSE mode) .........-e.000- 

| 104 68 | FRBFLAG] | Flag byte 

| | FRBDC | x'80' Data chaining specified 

| | FRBRDS | 40 Read/Sense command 

| | FRBRDB | 20 Read Backward command 

| | FRBSM1 | 10 Status modifier command and 

| | | data chaining 

| | FRBSM2 | 08 Status modifier command and 

| | | command chaining 

| | FRBSM3 | 04 Status modifier handling 

| | | in process 

| | | 02 Reserved 

| | FRBDOIO | 01 DOIO request 

| 105 69 | FRBFLAG2 | Flag byte for FASTIR 

| j FRBRRQ | X'80' REPLICA creation required 

| | FRBCFL | 40 Chained fixlist 

| j FRBVAL | 20 Valid fixlist entry 

| | FRBRCS | 10 Replica creation suppressed 

| | | 08 Reserved 

| | 04 Reserved 

| | | 02 Reserved 

| | O01 Reserved 
106-107 6A-6B | | Reserved 

| 108-111 6C-6F | FRBSFADR | Address of SETFLAG routine 

| 112-115 70-73 | FRBSMPTR | Address of status modifier list 

| 116-119 74-77 | FRBCDPTR | Address of control command list 
120-123 78-7B | FRBAFHB | Address of FHB (fixlist) 

| 124-127 7C-7F | FRBLNPTR | Address of LINEPTR stack 

| 128-131 80-83 | FRBLLPTR | Address of Locate list 
132-139 84-8B | FRBSAVLE | Save field for locate list entry 

| 132-135 84-87 | FRBALLE | Actual Locate list entry 

| 136-139 88-8B | FRBWRK1 | Work field 1 

| 140-143 8C-8F | FRBWRK2 | Work field 2 

| 144-147 90-93 | FRBWRK3 | Work field 3 
148-151 94-97 | FRBWRK4 | Work field 4 

| 152-155 98-9B | FRBWRK5 | Work field 5 

| 156-159 9C~9F | FRBSAV | Save area for register 15 
160-163 AO-A3 | FRBSAVO | Save area for register 0 
164-167 A3-A7 | FRBSAV1 | Save area for register 1 

| 168-199 A8-C7 | FRBSAV2 | Save area for registers 2-9 

| 200-203 C8-CB | FRBSAVA | Save area for register 10 
204-211 CC-D3 | FRBSAVB | Save area for registers 11-12 

| 212-219 D4-DB | FRBSAVD | Save area for registers 13-14 

| (220) (DC) | FRBEND | End of FRB 

| (116) (74) | LCCWFAR | Length of CCW Fixing work area 

[alae hdoestat ahead End of CCW Fixing area ........ ce cee cee eee eee eee 


| 104-167 
| 168-215 
| (112) 


68-A7 
A8—-D7 
(70) 


| Label 


SVC work area 
| SVCSV3 
| SVCWORK 
| LSVCWORK 


a 


Description 


| Save area for registers 9-8 
| Work area 

| Length of SVC work area 

End of SVC work area 
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Task Selection Control Block Interrelationship 


| 
Vv 


aa: (me Dear ree | 
|CRADDR | | PIBPTR| 
ees 


| <---—» zo HOH<. DH N——p> <n —— | 


service owner < 
partition 


Partition Selection String (PSS) 


iar. | 
| TID | 
| 
V 
eee | TIBPTR| TIBPTR| TIBPTR| *** TIBATAB 
| 
V 
ae | [0 so a | ia. al | 
| SCBPTR|<——\ | PCBPTR|<—— | TIBPTR| r—> | TCBPTR| 
fo! cerns |e an 
bf, 
| | Ce ae a | | 
V 4 {lv | V 
| | | | | | | | 
f  scB | | PCB | TIB | |  TCB 
| | | | | | | | 


A ay Pee WL ans te cl Oa coe, ili, . Tilt. ts lt sete 
ee | PIBPTR| PIBPTR| PIBPTR| ** PIBTAB . ¢* | TIBPTR}| TIBPTR| °¢ 
As Senden Nn Desi eas Wate ent Es . lt Se 


| TIBATAB 
V 


| rer 
| TIBPTR| 


> service requestor 
task 


This bit string is located in low core (Label PSS in the Supervisor) 


0 1 2 n-l n n 
s equal 0 


f= Sek oo oes 
eo ee ee ee 
ee ed, s equal 1 = 
SYS Pi P2 Pn-1 Pn 

SYS,P1,P2,.. 
> priority order, high to low 
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number of partitions 

no task of the partition 
is ready to run 

at least one task of the 
partition is ready to run 
»Pn = partition priorities 


Pe 
a 


| a 


alee 


a Tey 
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Partition Priority Owner Table (PPRTYOWN) 


(pointer to PPRTYOWN located in low core on fixed location X'2C4'.) 


0 4 8 4*n 

Fa ool oa age te oe | es | ——y{7 

| pebptr| pcbptr} pcbptr| *e** | pebptr| pcbptr| fullword pointers 
(ee 2 ee as iss 1 i 

SYS Pl P2 Pn-1 Pn 


> priority order, high to low 


pebptr = pointer to partition control block of priority owner 
SYS,P1,P2,...,Pn = partition priorities 


Task Selection String (TSS) 


0 1 2 31 
1 A task is ready to run 
is|ts fs [eee] s | when its status bit (s) is one. 
ee ey ee ees 
TO Tl T2 T31 


|—————>_ priority order, high to low 


Task Identifier String (TIDSTR) 


TIDSTR describes the priority of tasks within a partition. 
It is located in the Partition Control Block (PCB). 


Fe SEE Goer ee Saas 

| TID | TID {| TID | eee { TID | 1—byte entries 
ss ees ee ed 

TO T1 T2 T31 


| ————->_ priority order, high to low 


TIB Address Table (TIBATAB) 


The address of the TIB Address Table (TIBATAB) can be found on fixed location 
X'2C0' in low core. 


| System Tasks——> |<—————————User Tasks———————> | 
| | | 
| | 
| | 


0 4 8 128| 192 | 


| — SNS DSK [AR BG Fi Fn-1 [Si Sm | 
| | | | 
| | | | 
| | <——_———_Ma intasks > | <-Subtasks—> | 
| >4*TID (offset within TIBATAB) 


number of partitions 
number of subtasks TIB = Address of TIB 


3 
"ott 
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PCB Address Table (PCBATAB) 


(See Partition priority owner PPRTYOWN) 


 Partition/Task Control Tables Relationship 


PCB 18 1B 20 3F 
| | tTss | | TIDSTR | 
A [ | 
| Low Core Hoe | 
| 2C0 — 23 | | 
coe | | 
fo _ | 
L ee 
| V TIBATAB | | 
| 0 4 V Vv 
| f T T am | Te pl 
| | | | @TIB | | @TIB | 
| | eee oe Seer 1 1-11 
| | 
j j > 
| | 
| Vv Vv 
H TIB 8 B 14 17 TIB 8 B 14 17 
f T T T [= [ego =e be te T 
| | | @TCB | | @PCB | | | @TCB | | @PCB | 
L ease [ee T L | oo cs aii. (iia 
. 
| 


au 
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—— A -——————_! A 
| | | | 
Vv | Vv | 
TCB 8 | B TCB 8 | B 
[ qs Sd i T i 
| | @TIB | | | @TIB | 
t ae es | Sear Sent eee ee foe coe eee) ee 
@ = Address 


@@ TIB = @ TIBATAB + TID x 4 
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Task Status Flags and Resource Gates 


Function Codes 


|. Type | Value 


55 
56 
57 
58 


Foe = ie. py ahead asf 71 
| Name | Usage | 
RSGTBND Gate for real space segment table | 
SPFIXBND | Gate for PFIX in SVA processing | 
PWSRVBND | Gate for usage of POWER service | 
GQMGBND Gate for usage of LOG queue manager | 
G117BND Gate for usage of LOG service 
NPGRBND Gate for usage of LUB allocation services] 
VIOBND Gate for virtual I/O support | 
CONDRDY Flag for conditional ready state | 
IUCVBND Gate for IUCV support for VCNA | 
G108BND Gate for usage of SVC-6C 
SATBND Gate for usage of stored assign.table | 
CRTSVBND | Gate for CRTSAV usage | 
HCFCBBND Gate for HC-file control block usage 
ERQBND Gate for error queue entry 
G133BND Gate for XPCC processing 
OCF BND Gate for operator comm. facility 
OREBND Gate for operator request element | 
EOTBND Gate for EOT routine | 
SCYBND Gate for security task 
LCKBND Gate for LOCK file 1/0 
PGFXBND Gate for page to be freed 
GSMBND Gate for ALLOCATE processing 
THTABBND Gate for track hold table 
SFILBND Gate for SYSFIL 1/0 | 
SGTVSBND Gate for GETVIS SVA 
LQBND Gate for security logger queue 
Gate for console buffers 


a HAHANANODHNAANURNHANANUANUNRANAAURANUANRANNNANRNAAANNNANNANHRNNNRNDNANNNHENMN 
ae) 
oO 

~ 

Q 


 wEHaO 
fob bow wt 


wn 
| 


| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| CBFBND | 
| MICRBND | Gate for MICR 1/0 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 


| 

| 

| 
GETRBND Gate for GETREAL processing | 
FDIRBND Gate for program fetch directory | 
SEIZEBND Gate for SEIZE to be freed | 
CILBND Gate for CIL update | 
BUFBND Gate for copy blocks 
ICCFBND Gate for ICCF high priority task | 
PFRBND Gate for page frames | 
PFGBND Gate for page frames (occupied by TFIX) | 
CHQBND Gate for channel queue entry 
DIBBND Gate for DIB access | 
CCWBND Gate for CCW translation | 
TRKBND Gate for track to be freed | 
AVRBND Gate for AVR processing | 
G41BND Gate for ENQ/DEQ processing | 
G92BND Gate for XECB processing | 
NOTACT Flag for inactive tasks | 
SYSBND Flag for inactive system tasks | 
LTABND Gate for LTA use 
WAITBND | Gate for ECB/XECB (I/O or TIMER or POST) | 
READY Flag for ready to run state | 
IDRABND Gate for program fetch IDRA (old gate) | 
FPGMBND Gate for program fetch IDRA (new gate) | 
FETCHBND | Gate for program fetch processing | 
PGIOBND Gate for page 1/0 | 
PMRBND Gate for page fault processing | 
ENQBND Gate for RCB to be freed | 


permanently opened gate | 
permanently closed gate | 
I/O chain with permanently closed gate | 
wait chain with permanently closed gate | 
partition chain with switchable gate, | 
P gates located in Partition Control Block (PCB) | 

| 


= system chain with switchable gate 
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Task Status Flags and Resource Gates (cont...) 


© Copyright IBM Corp. 1985 


Usage 


Gate 
Gate 
Gate 
Gate 
Gate 
Gate 
Gate 
Gate 
Gate 
Gate 


for 
for 
for 
for 
for 
for 
for 
for 
for 


for 


terminator processing 
page-in 

LOCK/UNLOCK processing 
subtask to be canceled 
subsystem id processing 
LOCK to be freed 

EXTENT processing 
partition GETVIS 

CDLOAD 

PFIX 


permanently opened gate 

permanently closed gate 

I/O chain with permanently closed gate 
wait chain with permanently closed gate 
partition chain with switchable gate, 


P gates located in Partition Control Block (PCB) 


system chain with switchable gate 


: BT a | aaa | 
| Type | Value | Name | 
SS 
| s | 89 | TERMBND | 
{ c {| 8A | PGINBND | 
{ s | 8B | USEBND- | 
| c | 8c | CNCLBND | 
{| s | 8D { SSIDBND | 
| Ww |  8E | RURBND | 
| s | 8F | EXNTBND | 
| P {| 90 | GTVBND | 
{ P | 91 | CDLBND | 
| P | 92 | PFXBND | 
| Type o= 

| C= 

| i= 

| W= 

| P = 

| 

| S = 

LL 
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SVC 107 (X'6B') Function Codes 


MACRO 


TREADY 
TREADY 
TREADY 
TREADY 
TREADY 
TREADY 
GETFLD 
GETFLD 
GETFLD 
GETFLD 
GETFLD 
GETFLD 
GETFLD 
GETFLD 
GETFLD 
MODFLD 
MODFLD 
MODFLD 
MODFLD 
TREADY 
TREADY 
TREADY 
TSTOP 

TSTOP 

TSTOP 

TSTOP 

GETFLD 
GETFLD 
MODFLD 
MODFLD 
GETFLD 
GETFLD 
GETFLD 
GETFLD 
MODFLD 
MODFLD 
MODFLD 
GETFLD 
GETFLD 
MODFLD 
GETFLD 
TREADY 
GETFLD 
GETFLD 
MODFLD 
MODFLD 
GETFLD 
GETFLD 
GETFLD 
GETFLD 
GETFLD 
GETFLD 
GETFLD 
GETFLD 
TREADY 
RLOCK 

RLOCK 

TREADY 
TREADY 
TREADY 
TREADY 


| 
| 
| 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


OPTION 


LQ 

NO 

10 

VTAM 
CANCEL 
VCANCEL 
SAVAR 
PPSAVAR 
LTAPTR 
CNCLCODE 
PIK 
MAINTASK 
VTAMOPEN 
VTAMDISP 
AOTPTR 
SYSRESW 
CNCLCODE 
VTAMOPEN 
VTAMDISP 
START 

oc 
CANCEL 
SYSBND ,NO 
SYSBND , YES 
STOP 
UNBATCH 
CNCLALL 
ICCFPP 
SAVAR 
CNCLALL 
SYSRESW 
ICCFRO 
ACLOSE 
STATUS 
ICCFPP 
ICCFRO 
ACLOSE 
NSUB 
CPUTIME 
VSAMOPEN 
ABINPR 
ICCF 
LTAACT 
OPENSVA 
OPENSVA 
ICCFSVC 
PAGEIN 
PAGEOUT 
TERMACT 
EOTACT 
PCEXIT 
ITEXIT 
CNCLCOD2 
OCEXIT 
OCCF 
CRTSAV 
HCFCB 
CRTSAV 
HCFCB 
ATTINT 
OCCFIO 
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| FUNCTION] SERVICE| 


| 


| CLASS | AUTHORIZATION 


CODE 
| DEC/HEX | 
00 | 00 
01 { OL 
02 | 02 
03 | 03 
04 | 04 
o5 | Os 
06 | 06 
07 | 07 
08 | 08 
09 | 09 
10 | OA 
11 | OB 
12 | oc 
13 | oD 
14 | OF 
15 | OF 
16 | 10 
17 | 121 
18 | 12 
19 | 13 
20 | 14 
21 | 15 
22 | 16 
23 | 17 
24 | 18 
25 | 19 
26 | 4A 
27 | 4B 
28 | 1c 
29 | 1D 
30 | LE 
31 | 1F 
32 | 20 
33 | 21 
34 | 22 
35 | 23 
36 | 24 
37 | 25 
38 | 26 
39 | 27 
40 | 28 
41 | 29 
42 | 2A 
43 | 2B 
44 | 2€ 
45 | 2D 
46 | 2E 
47 | 2F 
48 | 30 
49 | 31 
50 | 32 
51 | 33 
52 | 34 
53 | 35 
54 | 36 
55 | 37 
56 | 38 
57 | 39 
58 | 3A 
59 | 3B 
60 | 3¢ 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
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LOG-TASK 


IPL+LOG—TASK 
KEY 0 PROGRAMS 


VTAM 


VTAM+POW+ICCF 


VTAM 
CURR. 
CURR. 


VTAM 
VTAM 
VTAM 


KEY 0 PROGRAMS 
VTAM+POWER+EOJ 


VTAM 
VTAM 


TASK 
TASK 


JCL+POWER 
JCL+POWER 


POWER 


SYSTEM-TASKS 
SYSTEM—TASKS 


JCL 
JCL 


TERMINATOR 


ICCF 


IPL+EOS 
TERMINATOR 


ICCF 
CURR. 
ICCF 
ICCF 
ICCF 
EOJ 


TASK 


OPEN/CLOSE 


ICCF 
ICCF 


CURR. 
CURR. 
ICCF 


ICCF 
ICCF 
CURR. 
CURR. 


CURR. 
OCCF 
OCCF 
OCCF 
OCCF 
OCCF 
OCCF 
OCCF 


TASK 
TASK 


TASK 
TASK 


TASK 
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SVC 107 (X'6B') Function Codes (cont...) 


Se — Na Ok ee ee eS Te ke —— tl ae ee oe 
| FUNCTION| SERVICE| 


ee ee 


| 
MACRO | OPTION { CODE | CLASS | AUTHORIZATION | 
| | | DEC/HEX | | | 
[+ -—_—_—___}—_____+_____] 
| GETFLD | OCCFACT | 61 | 3D | A | OCCF | 
| GETFLD | BALANCE | 62 | 3E | A | BAM | 
| GETFLD | SSFLAGS | 63 | 3F | A | SYSTEM-TASKS | 
| GETFLD | COMRGPTR | 64 [40 | A _ | | 
| GETFLD | OWNER {65 | 41. / A | | 
| SRCHFLD | CHNUNIT | 66 | 42 | A | | 
| SRCHFLD | DEVTYPE | 67 | 43 [| A | 
| DEVUSE | PU | 68 | 44] aA | | 
| DEVREL | PU 169 | 45] aA | | 
{| SENTER | LIBR | 70 | 46 | A | | 
| SLEAVE | LIBR | 71 | 47 | B | SYSTEM-TASKS | 
| VIO | POINT | 72 | 48 | B | | 
| GETFLD | USECNT | 73 | 49 | aA | | 
| GETFLD | PUSECNT {| 74] 44 [ A | | 
| GETFLD | MOUNTFLG | 75 | 4B | A | | 
| MODFLD | MOUNTFLG | 76 | 4¢ | A | JCL | 
| TREADY | POWER | 77 | 4D | A | POWER | 
| GETFLD | PUBXPTR | 78 | 4E | A f | 
| GETFLD | PCBPTR | 79 | 4F | A | | 
| GETFLD | TCBPTR | 80 | 50 | A | | 
| GETFLD | ABEXIT { 81 | 51 | B | CURR. TASK | 
| GETFLD | MSECS | 82 | 52 | <A | SYST.-TASKS+JCL| 
| MODFLD | MSECS | 83 | 53 | A | SYST.—TASKS+JCL| 
| VALID | READ | 84 | 54], A | | 
| VALID | WRITE |} 85 | 55] A | | 
| GETFLD | VSAMOPEN | 86 | 56] 8B | | 
| MODFLD | PERBIT | 87 | 57 | B | SDAID | 
| GETFLD | PU | e8 | 58 | aA | | 
| GETJA | PART | s9 | 59 | 6G f | 
{ MODFLD | RUNMODE | 90 | 5A | A | SYSTEM | 
| MODFLD | SASCOPE | 91 | 5B | A | SYSTEM | 
| MODFLD | PASCOPE | 92 | 5¢ | A | SYSTEM+POWER+ | 
| | | | | | OCCF | 
| RLOCK | ALLOCR {| 93 | 5D | A | SYSTEM | 
| RLOCK | RSGT | 94 | 5E | A | SYSTEM | 
| TREADY | ALLOCR | 95 | 5F | A | SYSTEM | 
| TREADY | RSGT {| 96 | 60 | A | SYSTEM | 
| MODFLD | LIBRSERV | 97 | 61 | A | KEY O | 
(ees ee i | er Sere eee | se ee 
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How to locate Task status and Save Areas 


COMREG 


| +5A | PIBTAB | +7C | PIB2TAB | | 


PIB2TAB & PIBTAB 


+8 | > +8 | > 

| SYS | SYSPCB | | BG | BGPCB | | 
| +8 > | 
| Fn | FnPcB. | | ———————__ | 
[]_—— fb —___——b pt 
| | £8 fe [te 
| | Fl | F1PCB | | 
=e 1 is Sea —H| 

| | | +4 | | 
| AR | | | BG | BGSAVE | | 
eS SS 
| +4 | an | | 
| Fn \ asses || = | 
Sa ee —- | 
| | +4 | Pil 
| | Fl | FISAVE | | 
a ' = at ++ 


PID & PIK (see Note 1) 


© Copyright IBM Corp. 1985 


T Or ae | 
| PIK Value in COMREG | 
— ate 1 
| PID | Part. | Number of Partitions | 
| | name | 12 | 11 | 10] 9 | 8 | 7 | 6 [5 4 [3 |2 | 


| oo | sys | 00 | 00 { oc | oo | 00 | Oo {| OO | 00 


| o1] Be | 10 | 10 | 10 { 10 | 10 [{[ 10 | 10 | 10 | 10 | 10 | 10 | 
So 

| oc | FL | co { Bo | Ao | 90 | 80 | 70 | 60 | 50 | 40 | 30 | 20 | 

| oB | ¥F2 { Bo | Ao | 90 | 80 | 70 {| 60 | 50 | 40 | 30 | 20 | 

SS he eee ee 

| oA {| ¥F3 | ao ] 90 | 80 | 70 | 60 | 50 {| 40 {| 30 | 20 | 

——}—-_|-— j 

[| 09 | F4 | 90 | 80 | 70 | 60 | 50 | 40 | 30 | 20 

| o8 | FS | 80 | 70 | 60 | 50 | 40 | 30 | 20 | 

[+ + +++} + 

{ o7 | F6 | 70 | 60 { 50 | 40 | 30 | 20 | 

/-———} ——+}—__+- + __}_;_ 

| 06 | ¥F7 | 60 | 50 | 40 | 30 { 20 | 

So a 

| o5 | ¥F8 | 50 | 40 | 30 | 20 | 

| 04 | ¥F9 | 40 | 30 | 20 | 

|} 03 | FA | 30 |] 20 | 

peed eaeraca! oer aces 

| o2 | FB { 20 |{ 

til 

SYSCOM (see Note 2) 

bilo tah Wie ge ena Ne Wee NE tee wee alae 

| +58 | LIK/TIK | eee +11c | ICCF VT | | 

es i oh Gen Nig 1 J 
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Low Core Pointers used for Task Selection: 
eS a a aa | 


| Address | I 
x'248' Address of PIBAREA (PIB2TAB,PIBTAB) 
x'24c' Address of System PCB 
x'250' Address of SCB address vector 
x'254' Address of current SCB 
x'258' Partition selection string (PSS) 


X'264' Address of currently active TIB 
x'268' Address of currently active PIB 


ee ere ee maps i agen ee a tem ee 


| | 
| { 
| | 
| | 
x'260' Address of currently active TCB 
| | 
| | 
| | 
| | 


x'26C' Address of currently active PCB 
x'2c0' Address of TIB table (TIBATAB) 
x'2c4' Address of Part. Priority Table (PPRTYOWN) 


TIEBATAB (see Note 3) 


Fine 3% Gas ns ee ae ee TF aT | 
| SNSTIB | DSKTIB | RASTIB de 
uel Ed eee 
f . «© © © © © © «© © «© © « } ARTIB | 
a 
| BGTIB | F1TIB | F2TIB [)-@ere er 
Se eee 
| oo © © © © © © © © @© @ | SUBTIB | 
C—O 
| SUBTIB | SUBTIB re | 
| ee «© © © © «© © © © @ | SUBTIB | 


|e 


TIB {see Note 4) 


| |Flag] TCB | TID | PCB | TSS Flag Byte | 

Me ht Ft 
+8 +10 +14 +20 

TCB 


: TID's 01 — 08 
| Task pas poe oO 
| [FLAG] TCB | 

L______L___t sod other 


+6 +8 +C +18 +FC +106 


IccF V.T. +4C +50 


(eS ei me ee ND ee I Lg ee PP ele oe nl 
| | PCBATAB | TIBATAB | | 
! 


PCBATAB 


Weep te a ds ge ee ee ee oe al 
| SYSPCB | BGPCB | FnPCB | © © © © | FIPCB | 
a ae See REPT: (METRE POPE (0k ASO aS | 


PCB +4 
eee 

o | | Partition Priority Mask | 
ee ee a ea ee 
if e e 
— pe 
+18 | Task selection bit string| | 
— —_———— 
+20 | TIDs of attached tasks in priority order | 
| 
SS 
+40 | | | | 


I 
+48 | SCB ptr. of alloc. space | SCB ptr. of active space | 


| | 


| 
Sena ree Le la ety 
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PSS bitstring (see Note 5) 

o 41 2 n-l on 

Z| ea ep ed 
is{sf{s]* ¢ © © © © © © | g {sg | 
[ beens Leas! Aererenn Ee ae ee Pees) Dee Se | 
SYS Pl P2 Pn-1 Pn 
}+—-—-> priority order, high to low 
TID 


Tasks are identified by hexadecimal numbers 1 to n where n depends on the number 
of subtasks generated in the supervisor. The following table shows the task 
identifier (TID) values and their assignments to particular tasks: 


System Tasks: 


01 SNS O07 SUP 00. reserved 
02 DSK 08 DIR OE reserved 
03 RAS 09 CRT OF SVT 
04 PMR OA ASY 10 - 1F reserved 
0S reserved OB ERP 20 AR 
06 PGN oc =6LCK 
Main Tasks: 
20 AR 26 F5 * 2B FA * 
21 BG 27 F6 * 2C FB * 
22 Fil * 28 *F7 * 2D reserved 
23 F2 * 29 F8& * 2E reserved 
24 F3 * 2A FO * 2F reserved 
25 F4 * 


* Depending on the number of partitions all or some of these keys 
may be unused (in descending order of values). 


Subtasks: 30 - nn 
Notes: 


1. Pid like PIK assumes different values depending on the number of partitions 
generated (PID = PIK / 16). 


2. LIK 
TIK 


Key of task owning LTA 
Key of task running 


3. To correctly point to a TIBATAB entry, shift the task ID (TID) left by 2, 
and use the result as displacement in TIBATAB. 


4. TIB + X'10’ contains: 
User Task: TID of task 
System task: TID of serviced task 


5. The value of 1 in PSS means: At least one task in selected partition is 
ready to run. 
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f 
Event Control Block (ECB) fe 
1 T am 
| | | | | 
| Reserved | Reserved | ° | Reserved | 
| | | | | | 
renee eee ce eae ee Netcare ee, Semi ceeeeeee= 
0 1 3 


Event completed or 
terminated normally 
x'Co' Abnormal termination ~. 


“~<I—N 
0 
3° 
LON 
2% 


Resource Control Block (RCB) 


a Tt 1 

|X'FF' | |x'so'| | 

| or | RESERVED | or | ECB ADDRESS | . 

|x'oo' | |X'oo'| | a 

fa ed eee | 
\, 

) 1 34 5 7 Xe 

rc 

| Bytes Description 

y 
i 
0 X'FF' resource is in use 


X'00' resource is not in use 


1-3 Reserved 
4 X'80' Another task waiting for this resource 
5-7 ECB address of current resource owner 


cae 


Task Timer Table (TTTAB) 


i T i ae | T ? 
|FLAG|EXIT ROUTINE|PSW | SAVE AREA | | 
|BYTE| ADDRESS  |KEY ADDRESS | TASK TIMER INTERVAL | 
| | | | | 
a a eh el | sarees | 
0 1 34 5 78 15 
fe T | 
Bytes” | Description | 
San SSR EN \ 


| ¢) Flag byte 

| X'80' User EXIT routine already active 
| 40 — 01 Reserved 

} 1-3 User's STXIT TT routine address 

Zero if STXIT not yet issued 


4 | Caller's PSW key 
| Zero if STXIT not yet issued fe 
| 8 -15 SETT issued: 


Interval time still left 


| 
| 
| Bits 0-51 contain the time in microseconds 
| | Bits 52-63 are ignored 
| No SETT issued: 

| 


| 
| 
| 
| 
| 
| 
5-7 Address of users save area | 
| 
| 
| 
| 
| 
| 
Zero or negative | 
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é Format of XECB Table Entry 
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a a 
Bytes | Description 
Oo- 7 XECB name 
ACCESS Control byte 


| 

| 

| X'80' Table entry in use 

| 40 Task that issued 

| XPOST was canceled 

| 20 Reserved 

| 10 Reserved 

| XWAIT access indicator 

| 08 ACCESS=XPOST specified | 

| 04 ACCESS=XWAIT specified 

| XPOST access indicator 

| 02 ACCESS=XWAIT specified 
| | 01 ACCESS=XPOST specified 

| 

| 

| 

| 

| 

| 

i 


Sone rater) cee 


| 9-11 | XECB address 
12 - 13 | TID of owner 
ee ie | 14 —- 15 | TID of first task that posted 
: \ | XWAIT or XPOST for XECB | 
od {| 16 — 19 | Forward chain pointer 
| 20 — 23 | Backward chain pointer 
l 


If bits 4 and 5 of byte 8 are set to 10, bytes 14 and 15 contain the TID of the 
first task that issued an XWAIT for this XECB. 


If bits 6 and 7 of byte 8 are set to 10, bytes 14 and 15 contain the TID of the 
first task that issued an XPOST for this XECB. 


Label XECBTAB identifies the first byte of the table. 
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SYSTEM COMMUNICATION REGION (SYSCOM) 
| Bytes | | 


Dec Hex | Label | Description 


| 
|} 


| 0-3 0-3 | IJBERBLC | Address of error block | 
| 4-7 4-7 | IJBHWC | Hard Wait Code (Note 2) | 
{ 8-11 8-B | IJBERR19 | Address of CANCEL exit for ERP | 
| | | message writer | 
} 12-15 c-F | IJBPUBRS | Pointer to SYSRES PUB (set by IPL) | 
{ 16-19 10-13 | | Reserved | 
| 20-23 14-17. | IJBSPAVT | Address of supervisor address vector | 
| 24-27 18-1B | IJBPTCOM | Address of VSE/PT communication area | 
| 28-31 1c-1F | IJBLTA | Address of Logical Transient Area | 
| 32-35 20-23 | IJBPPBEG | Begin of Problem Program Area } 
| | | (set by IPL) | 
| 36 24 | IJBFLPTR | Free list pointer | 
| 37-39 25-27. | IJBCHANQ | Address of Channel Queue | 
| 40-41 28-29 | IJBQSIZE | Number of Channel Queue entries | 
| 42-43 24-2B | IJBQLNG | Length of ERP Error Queue entry | 
| 44-45 2C-2D | IJBNPART | Number of partitions | 
| 46 25 | IJBFLGO5 | Flag byte | 
| | IJBAF | x'80' AF System (always on) | 
| | | 40 DOS/VSE System (always on) | 
| | | 20 TP Balancing not active | 
| | | 10 Reserved | 
| | | 08 Console Buffering (CBF) active | 
| | | 04 Reserved | 
| | IgBcseps { 02 CS and CDS supported | 
| | IJBSIPOF | 01 SIPO format flag | 
| 47 2F | IJBFLGO6 | Flag byte | 
| | IJBEMODE | X'80' ECPS:VSE mode 
| | {| 40 Reserved | 
| | | 20 Reserved | 
{ | |  1t0 Reserved | 
f | | 08 Reserved | 
| | IJBCKD | 04 CKD support generated | 
i | | (always on) | 
| | IJBFBA | 02 FBA support generated | 
| | | (always on) | 
| | I3B3800 | 01 3800 support generated | 
| | | (always on) | 
| 48-51 30-33 | IJBVSIZE | Total virtual storage size | 
{ 52 34 | IJBCONSP | | 
| | IJBOCFLG | DOC configuration byte | 
| | | X'80' CRT support initialized | 
{ | | 40 Reserved | 
| | | 20 Reserved | 
| | | 10 Reserved | 
| | | 08 Reserved | 
| | | 04 Reserved | 
| | | 02 Support for 3277 screen I 
| | f (always on) | 
| { | OL CRT support generated | 
| | | (always on) | 
| 53-55 35-37 | | Address of Console Communication Area| 
| | | (Address of CRT Table) | 
| 56-59 38-3B | IJBOCFCM | Address of OCCF Communication Area | 
| 60-63 3C-3F | IJBVIOCM | Address of VIO Communication Area | 


; { i a 


Note: 
The address of SYSCOM can be found at fixed location X'80' - X'83°. 
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System Communication Region (SYSCOM) (cont...) 


I, 7 stew ee ee glee I Oe ee ee ae 


| Bytes | | 
| Dec Hex | Label | 
SS 
| 64 40 | IJBFLGO1 | 
| | IJBRMSR | 
| | | 
| | IJBRMS | 
| | | 
| | | 
| | | 
| | | 
| | | 
| IJBITDWN | 
| 65 41 IJBFLGO2 | 
| IJBCBF | 
| IJBJA | 
| | 
IJBDSDFP | 
| | 
| IJBSEC | 
| | 
| | 
| | | 
| | | 
| | IJBMPXGT | 
| | | 
| | | 
| | IJBIPLAC | 
| 66 42 | IJBFLGO3 | 
| | | 
| | | 
| | 

| IJBIPLV | 

| 

| | 
| | 
| | 
| 

| 67 43 IJBFLGO4 | 
| 

| | 
| | 
| IJBVMBTM | 
| | 
| | 
| | 
| IJBVMLE | 
| | | 
| 68-69 44-45 | IJBHSTID | 
| 70-71 46-47 | IJBHMTID | 
| 72-75 48-4B | IJBVPBEG | 
| 76 4C | IJBTHPTR | 
| 77-79 4D-4F | IJBTKHLD | 
80-87 50-57 | | 
88-89: 58-59 | IJBLIK | 
90-91 5A-5B | IJBTIK | 
92-95 5C-5F | IJBPWR | 
96-99 60-63 | IJBTCAVT | 
100-103 64-67 | IJBRFTAB | 
104-107 68-6B | IJBEUECB | 
108-111 6C-6F | IJBOLTEP | 
108 6C | IJBOLTSW | 

| IJBOLTAC | 

109-111 6D-6F | IJBOLTPT | 

| 112-115 70-73 | IJBRASLN | 
116-119 74-77 | IJBTRTAB | 
120-123 78-7B | IJBPBOWN | 


Description 


—+ 


RMS flag byte | 
X'80' RMSR support generated 
(always on) 
40 Full RMS support (always on) | 
20 Always off 
10 Reserved 
08 Reserved 
04 Reserved 
02 Reserved 
01 IT support down (Clock damage) | 
Flag byte | 
X'80' Console buffering active | 
40 Job Accounting support active | 
(SYS JA=YES) | 
20 DASD File Prot. support active | 
(SYS DASDFP=YES) 
10 Access Control support active | 
(SYS SEC=YES) | 
08 Reserved | 
04 Channel Scheduler entered after| 
interrupt | 
02 Byte MPX channel gating | 
(switched on/off by | 
AR MPXGTN ON/OFF) | 
01 IPL in progress | 
Flag byte | 
X'80' Reserved | 
40 RAS in special WAIT state | 
20 RAS IPL in progress | 
10 Virtual storage has been | 
initialized by IPL 
08 VSE/POWER supported (always on)| 
04 VSE/POWER initialized | 
02 GETREAL in progress | 
01 Reserved | 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


Flag byte 

X'80' System GETVIS Area initialized 
40 EXCP REAL supported (always on) 
20 CDLOAD supported (always on) 
10 BTAM AUTOPOLL enabled 
08 XECB supported (always on) 
04 Reserved 
02 Batch deactivated by TPIN 
01 VM Linkage Enhancements 

(MODE=VM) 

Highest system task TID 

Highest maintask TID 

Begin of V-Pool for VIO 

Track Hold free list header 

Address of Track Hold Table 

Reserved 

Task ID of LTA owner 

Task ID of current task 

Address of POWER Table 

Address of VTAM Address Vector Table 

Address of RF Table 

Reserved 

Flag byte and address of OLTEP Bucket 

Flag byte 

X'80' OLTEP is active 

Address of OLTEP Bucket 

Address of RAS Linkage Area 

Address of ASCII Table 

Address of PUB Ownership Table 
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System Communication Region (SYSCOM) (cont...) 


| 


4-76 


ee pe 
Bytes | 
| Dee Hex | Label 
124-127. 7C0-7F | IJBJATAB 
128-131 80-83 | IJBPROCT 
132-135 84-87 | IJBIJBSD 
136-139 88-8B | IJBSAVSD 
140-143 8C-8F | IJBLNSTB 
144-147. 90-93 | IJBARBUF 
148-151 94-97 | IJBAPTA 
152-153 98-99 | IJBNDEV 
154-155 9A-9B | IJBNSDEV 
| 
156-157. 9C-9D | IJBVTPIK 
158-159 9E-9F | IJBPWPIK 
160-161 AOQ-Al | IJBICPIK 
162-163 A2-A3 | 
164-165 A4-A5 | IJBLPBDV 
166-167. A6-A7 | IJBPHLSL 
168-169 A8-A9 | IJBDMPDV 
| 
170-171 AA-AB | IJBRECDV 
| 
172-173 AC-AD | IJBCATDV 
| 
174-175 AE-AF | IJBRESDV 
176-179 BO-B3 | IJBTTAB 
180-183 B4-B7 | IJBSMCOM 
184-187. B8-BB | IJBPMCOM 
188-189 BC-BD | IJBTPBAL 
190-191 BE-BF | IJBTTPID 
| 
192-202 CO-CA | IJBMFCER 
| 
203 CB | IJBNERQ 
| 
204-205 cC-CD | IJBPUBLN 
206-207 CE-CF | IJBAPNO 
208-211 DO-D3 | IJBSEGT 
| 
212-215 D4—-D7 | IJBAPT 
216-217. D8-D9 | IJBNPGR 
| 
218-219 DA-DB | IJBGHLUB 
| 
220-223 DC-DF | IJBASMCB 
224-227 EO-E3 | IJBDPDTB 
228-229 E4-E5 | IJBOCDEV 
230-231  E6-E7 | IJBNTASK 
232-235 E8-EB | IJBSSBEG 
236-239 EC-EF | IJBEOR 
| 
240-243 FO-F3 | IJBFTTAB 
| 
244-247 F4-F7 | IJBSVA 
244 F4 | IJBSVAFL 
| 
| 
| 
| 
| 
| 
| 
245-247 FS5-F7 | IJBSVAAD 
248-251 F8-FB | IJBSVIS 
252-255 FD-FF | JJBARPSL 


7 


| 
| 


Description | 


Addr. of Job Accounting Common Table | 
Address of Procedure Common Table | 
Used by SDAID | 
Address of SDAID Area | 
Address of Line Mode Table | 
Address of AR input buffer | 
Address of Physical Transient Area | 
Number of ADD-ed devices | 
Number of ADD—ed partition | 
sharable devices | 
VTAM PIK (set by SUBSID) | 
POWER PIK (set by SUBSID) | 
ICCF PIK (set by SUBSID) | 
Reserved | 
PUB pointer of printer buffer load | 
Length of phase load list | 
cuu of SYSDMP device | 
(from IPL DEF command) | 
cuu of SYSREC device | 
(from IPL DEF command) | 
cuu of SYSCAT device | 
(from IPL DEF command) | 
cuu of SYSRES device | 
Address of Task Timer Table | 
Addr. of storage management comm. area} 
Addr. of page management comm. area j| 
TP Balancing parameter | 
PIK of partition owning | 
the Task Timer | 
Repositioning information | 
for 2560/5424/5425 ERP | 
Number of ERP Error Queue entries | 
(always=1) | 
Length of PUB Table | 
Number of active virtual partitions | 
Address of Segment Table | 
(only for MODE=370) | 
Address of page table | 
Total number of programmer LUBs | 
(NPGR parameter) | 
Highest used BG programmer | 
Logical Unit | 
Address of SMCB Address Table | 
Address of DPD Table | 
cuu of SYSLOG device | 
Number of subtasks supported | 
Addr. of first byte after supervisor | 
End of real storage | 
(only for MODE=370) | 
Address of system library offsets | 
for FETCH | 
Flag and address of SVA | 
Flag byte for Shared Virtual Area | 
X'80' Reserved | 
40 SDL active | 
20 Reserved | 
10 SDL build in progress | 
08 SDL overflow | 
04 High level SDL search | 
02 Reserved | 
O01 Reserved | 
Address of Shared Virtual Area | 
Address of System Getvis Area . | 
Address of RPS Local Directory List | 
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System Communication Region (SYSCOM) (cont...) 


= =z TO aaa ET | 
| Bytes | | | 
| Dee Hex | Label | Description | 
+— } —| 
| 256-259 100-103 | IJBARPSR | Address of RPS Sector | 
| | | Calculation Routine 
| 256 100 | IJBRPSIS | RPS flag byte | 
| 260-263 104-107 | IJBDLAB {| Address of System Code | 
| 264-267 108-10B | IJBASY | Flag and addr. of Asynch. Operator | 
| | | Communication Table | 
| 264 108 | IJBASYFL | Flag byte for Asynchronous | 
| | | Operator Communication | 
| | | x'80' Reserved | 
| | | 40 ASYNOC task is active | 
| | | 20 Read is requested | 
| | | 10 Reply or command is already | 
| | | in input buffer | 
| | | 08 Reserved | 
| | | 04 Print message 0D13D 
| | | 02 Message OD13D has been printed | 
| | | O01 Reserved | 
| 265-267 109-10B | | Address of Asynchronous Operator | 
| | | Communication Table | 
| 268-271 10C-10F | IJBSLACB | Address of SLA work areas | 
| 272-275 110-113 | IJBSVIPL | Address of Supervisor~IPL | 
| | | Communication Area 
| 276-279 114-117 | IJBAMSVA | Address of SVA module area | 
| 280-283 118-11B | IJBNPDA | Address of NPDA appendage | 
| 284-287 11C-11F | IJBETSS | Address of ICCF Vector Table | 
| 288-291 120-123 | IJBSCTAB | Address of Security Vector Table | 
| 292-295 124-127 | IJBPCSAV | Address of Special Save Area for | 
| | | error in system code | 
| 296-299 128-12B | IJBINSTR | Pointer to instrumentation data | 
| 300-303 12C-12F | IJBPLCT | Address of Librarian Control Table | 
304 130 | IJBFINSC | End of system communication area | 
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Bit oo gee eS a Oe eR ee Se eS ered 


| Bytes 
Dec 


54 


Hex 


35 


36 


| 
| 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


Label 


JOBDATE 


COMUSCR 
UPSI 


COMNAME 
PPEND 


HIPHAS 
HIPROG 


LABLEN 


PID 


EOCADR 
CONFIG 


RMSBIT 


LTACT 
DDMMYY 


DASDFPSW 


*, 


SOB1 


| 


Description 


MM/DD/YY or DD/MM/YY 
Updated by GETIME macro or set by 
DATE. Format is controlled by bit 0 
of byte 53, see below. 
Reserved 
User area 
User program switch indicator 
(UPSI byte) 
Job name from JOB statement 
End address of program space within 
partition 
End address of last phase loaded 
End address of largest phase for a 
multi-phase program (see SVC 
51-X'33') Length of Problem Program 
label area (always 0) 
Partition identifier (PIK), same as 
PIB offset 
BG COMREG: PIK of active partition 
End address of virtual storage 
Machine configuration byte 
X'80' Standard storage protection 
(always on) 
40 Decimal feature (always on) 
20 Floating point feature 
(always on) 
10 Physical transient overlap 
option (always on) 
08 Standard timer feature 
(always on) 
04 Channel switching supported 
(always on) 
02 Support for burst mode on byte 
MPX (always on) 
01 RMS support available 
(always on) 
System configuration byte 
X'80' DDMMYY date format convention 
40 Two or more partitions 
(always on) 
20 DASD file protect active 
(SYS command) 
10 SYSFIL support (always on) 
08 Teleprocessing support 
(always on) 
04 Two or more partitions 
(always on) 
02 Multitasking support 
(always on) 
01 Track Hold support 
(TRKHLD parameter) 
Standard language translator options 


(generated value 1100110, changed by 


STDOPT statement) 


| 
| 


—-—-—— 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


a 


Note: 


The address of the communication region of the active partition 
can be found at fixed location X'14' — X'17'. 
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Partition Communication Region (COMREG) (cont...) 


| Bytes | 

Dec Hex | Label | 
| 54 36 | SOB1 | 
| | (cont.) | 
| | | 40 
| | | 
| | | 20 
| | | 
| | | 
| | | 10 
i | | 
| | | 08 
| | | 
| | | 04 
| | | 
| | | 02 
| | | 
| | | Ol 
| 55 37 | SOB2 | Flag 
| | | x'so' 
| | | 40 
| | | 20 
| | | 
| | | 10 
| | DUMDVC | 08 
| | | 04 
| | | 02 
[ | | 
| | | Ol 
| 56 38 | Jcswi | Flag 
| | JASWITCH | x's8o' 
| | | 
| | JCOPEN | 40 
| | | 
| | JCINRDR | 20 
| | | 
| | | 10 
| | JOBEND | 08 
| | | 04 
| | | 
| | | 02 
: lee. 1 
| 57 39 | Jcsw2 | 
| | | x'8o' 
| | IJBACTCL | 40 
| | ALLOWEX | 20 
| | | 10 
| | IGNTESTM | 08 
| | | 04 
| 58 3A | JCsw3 | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| | | 
| ee 1 


Description 


X'80' DECK option, object modules on 


SYSPCH 

LIST option, source listings 
and diagnostic on SYSLST 
LISTX option, hexadecimal 
object modules 

listings on SYSLST 

SYM option, symbol tables on 
SYSLST/SYSPCH 

XREF option, cross reference 
list on SYSLST 

ERRS option, diagnostics on 
SYSLST 

CHARSET option, 60 character 
set (else 48) 

Reserved 
byte 


Always on 

STDOPT DUMP=YES or PART 
Partition waiting for volume 
mount (Job Control) 

STDOPT LOG=YES 


Dummy device search in progress 


Reserved 

Relocating loader supported 
(always on) 

ASCII supported (always on) 
byte 

Job Accounting not active 
(SYS command) 

Return to caller on LIOCS 
disk open failure) 


Job Control input from SYSRDR 


(else SYSLOG) 

Job Control output on SYSLOG 
Skip to end of job 

Pause at end of job step 

(JC PAUSE statement) 

Always 0 


SYSLOG assigned to same device 


as SYSLST 


Linkage Editor control byte 


SYSLNK open for output 
Action clear indicator 
Allow EXEC 


Catalog Linkage Editor output 


Ignore test mode 
— 01 Reserved 


Non-standard language translator 
options (set by OPTION statement) 


X'80' DECK option, object modules 

on SYSPCH 

40 LIST option, source listings 
and diagnostic on SYSLST 

20 LISTX option, hexadecimal 
object modules listings 
on SYSPCH 

10 SYM option, symbol tables 
on SYSLST/SYSPCH 

08 XREF option, cross reference 
list on SYSLST 

04 ERRS option, diagnostics 
on SYSLST 

02 CHARSET option, 60 character 
set (else 48) 

01 Rewind/unload option 
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| Dec Hex | Label | Description | 


[$f 


59 3B JCSW4 Job Control flag byte 
X'80' Job in progress 
OPTDUMP 40 OPTION DUMP 
20 Pause at end of job step 
(AR PAUSE command) 
10 OPTION LOG 
08 Temporary assignment for SYSRDR 
TESTMODE 04 SDL scanned as specified 
by LIBDEF 
DATEBIT 02 DATE statement processed 
for current job 
BATINIT 01 START/BATCH command just issued 
60 3C JCSW7 Job control flag byte 
OPCNCL X'80' Indicator for operator cancel 
JCLTSTRN 40 OPTION TSTRUN 
LIBPCHNG 20 LIBDEF PROC change 
PRCFRSTL 10 Used to control check for 
PROC statement 
PRCFRSTH 08 Used to control check for 
PROC statement 
IJBOVLOG 04 Procedure overwrite statements 
to be read from SYSLOG 
IJBICCNL 02 Job Control CANCEL issued 
IJBUSRMD 01 User mode 
61 3D NSTLEVEL Procedure nesting level 
62 3E JCSW8 Job control flags 
IJBCNCPD X'80' Operator cancel pending 
IJBRCCNC 40 RC operator cancel 
IJBARCNA 20 Delay AR cancel 
IJBEOPDL 10 EOP delayed 
04 Reserved 
02 Reserved 
01 Reserved 
63 3F Reserved 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| IJBABTRM | 08 Abnormal termination 
| 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 


64-65 40-41 PUBPT Address of PUB Table 
66-71 42-47 IJBJOBST Job start time 
72-73 48-49 FICLPT Address of FICL 
74-75 4A-4B NICLPT Address of NICL 
76-77 4C-4D LUBPT Address of partition LUB Table 
78 4E SYSLINE SYSLST line count as specified by 
STDOPT LINES=nn 
79-87 4F-57 SYSDATE System date, MNDDYYDDD or DDMMYYDDD 
79-82 4F-52 MMDD MMDD or DDMM 
83-87 53-57 YYDDD YYDDD portion of date 
88 58 LIOCSCOM LIOCS communication byte 1 
X'80' Reserved 
LIOCSRDS 40 Return to $$BODSMO 
20 Reserved 
10 Reserved 
08 Reserved 
LIOCSOIP 04 Open/close in progress 
LIOCSCPO 02 CP/DI open indicator 
O01 Reserved 
89 59 LIOCS communication byte 2 
LIOCSRSV X'80' Return from SVA 
40 Reserved 
20 Reserved 
10 Reserved 
LIOCSRTM 08 Reserved 
LIOCSRLB 04 Return from $$BOPLBL 
LIOCSQMT 04 QTAM DTF 
LIOCSRLK 02 Return from ‘LOCK’ 
01 Reserved 
90-91 5A—-5B PIBPT Address of PIB Table 
92-93 5C-5D CHKPTID ID of last checkpoint 
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Partition Communication Region (COMREG) (cont...) 
(OS ae ee ad OW eg eS a eer 
| Bytes | | | 
Dec Hex | Label | Description | 
94-95 5E-5F JOBZON Job zone in minutes. 
Value is positive for ZONE=EAST 
and negative for ZONE=WEST. 
Address of partition DIB Table 
Flag byte 
X'80' One or more 3800 extended 
buffering DTF's open 
40 Reserved 
20 Reserved 
10 Reserved 
08 Reserved 
04 Reserved 
02 Reserved 
O01 Reserved 
Flag byte 
X'80' BTAM active in partition 
40 Reserved 
20 Reserved 
10 Reserved 
08 Reserved 
04 Reserved 
02 Reserved 
01 Reserved 
Reserved 
PIK of partition 
Space id (370 only) 
PIK of part. owning the LTA 
(set only in BG COMREG) 
Address of SYSPARM field 
Address of Job Accounting Table 
Address of TOD common area 
Address of PIB2 Table 


| 

| 

| 
96-97 60-61 | 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 

PDTABB | Address of MICR DIF Table 

| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


98 62 


DIBPT 
DEVFLG1 
OPN3800 


99 63 OPNBYT2 


BTAMFLG 


100-105 64-69 
106-107 6A-6B 
108-109 6C-6D 
110-111 6E-6F 


PWTIMS 
IJBSPID 
LTK 


112-115 10-73 
116-119 74-77 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| SYSPAR 
| 120-123 78-7B 
| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| JAPART 
B | TODCOM 
124-125 7C-7D | PIB2PTR 
126-127. 7E-7F | 
128-131 80-83 | 
132-133 84-85 | 
134 86 | 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


LABELPTR Reserved for LIOCS 
BGCOMPT Address of BG COMREG 
OPTNBYTE Flag byte 
X'80' Reserved 
40 Reserved 
20 Reserved 
10 Reserved 
08 Reserved 
04 Reserved 
02 Count pages for Job Accounting 
01 GETVIS area initialized 
Flag byte 
X'80' PCIL support (always on) 
40 TOD support (always on) 
20 PFIX support (always on) 
10 Fetch S$$BOPEN by SJOBCTLJ 
08 Fetch SSBOPEN by S$JOBCTLD 
04 Fetch $$BOPEN by SJOBCTLJ 
02 Reserved 
01 RPS support 
Addr. of job control work area 
Job Control standard option 
(STDOPT statement) 
Generated value is 010000-0 
X'80' EDECK 
40 ALIGN 
20 PARTDUMP 
10 RLD 
08 SXREF 
04 TERM 
02 Reserved 


01 ACANCEL 
Ma hse 


JAPGCIND 
ANCHTBIT 
135 87 RMSROPEN 


TODBIT 


136-139 88—8B 
140 8C 


IJBJCWA 
STDOPT 


OPTPDUMP 
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Partition Communication Region (COMREG) (cont...) 


YO 


oe ee oS a ee 
| Bytes | | | 
| Dec Hex | Label | Description | 
| 8D | TEMOPT | Job Control temporary option | 
| | | (OPTION statement) | 
| | | X'8Q' EDECK I 
| | | 40 ALIGN | 
| | | 20 PARTDUMP | 
10 RID 
| | | 08 SXREF | 
| | | 04 TERM | 
| | | 02 SUBLIB=DF | 
| | | 01 Reserved | 
| 142 8E | DISKCONF | Disk configuration byte I 
| | | X'80 - 10° Reserved | 
| | {| 08 3350 support (always on) { 
| | | 04 3340 support (always on) | 
| | | 02 3330 support (always on) | 
| | { 01 2311 and 2314/2319 support | 
| | | (always on) | 
| 143-150  8F-96 | PROCNAM | Procedure name | 
| 151 97 | PSWTCH | Interface byte for Cataloged | 
| | | Procedures 
| | IJBPCALL | X'80' Procedure being executed | 
| | IJBPOVMD | 40 Overwrite processing | 
| | IJBPDATA | 20 SYSIPT data present | 
| | IJBPOVRQ | 10 Overwrite request for | 
| | | Job Control | 
| [| IJBPINST | 08 Insert request for Job Control | 
| | IJBPNDMK | 04 End of procedure | 
| | IJBPSLOG | 02 Called from SYSLOG | 
| | IJBPOVBT | 01 Overwrite request for | 
| | | supervisor | 
| 152-158 98-9E | POVNAM | JCL statement name for Cataloged | 
| | | Procedure 
| 159 9F | INSIZE | Flag byte | 
| | | X'80' Permanent 81 bytes on SYSRDR_ | 
| | | 40 Permanent 81 bytes on SYSIPT | 
| | RDR81T | 20 Temporary 81 bytes on SYSRDR_ | 
i | IPT81T | 10 Temporary 81 bytes on SYSIPT | 
| | | 08 — 02 Reserved | 
| | CATALSA | 01 Allow /& within procedure | 
| | | to be cataloged | 
| 160-163 AO-A3 | POWPCB | Pointer to VSE/POWER Partition | 
| | | Control Block | 
| 164 A4 | POWFLG1 | VSE/POWER flag byte | 
| | POWACCT | X'80' POWER accounting supported | 
| | POWUPART | 40 POWER controlled partition | 
| | POWPART | 20 POWER partition { 
| | POWPDORM | 10 POWER partition dormant | 
| | POWWPART | 08 POWER controlled partition | 
| | | waiting for work | 
| | | 04 — 01 Reserved | 
| 165 A5 | POWFLG2 | Reserved for VSE/POWER | 
| 166-167 A6-A7 | IJBVSSNP | VSAM snap dump function bytes | 
| 166 A6 | IJBSNPO1 | X'80' SNAP dump indicator 1 | 
| | | X'40' SNAP dump indicator 2 | 
| | | X'20' SNAP dump indicator 3 | 
| | | X'10' SNAP dump indicator 4 | 
| | | X'O8' SNAP dump indicator 5 | 
| | | X'04' SNAP dump indicator 6 | 
| | | X'02' SNAP dump indicator 7 | 
{ | | X'O1' SNAP dump indicator 8 | 
ence ee ae iia Sree! 
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Partition Communication Region (COMREG) (cont...) 


—_ i 1 

| Bytes | 

| Dec Hex Label | Description 

bh ! 

| 167 A7 IJBSNPO9 | X'80' SNAP dump indicator 9 

| | X'40"' SNAP dump indicator 10 

| | X'20' SNAP dump indicator 11 

| | X'10 - 01' Reserved 

| 168-171 A8-AB | LUBEXT | Address of LUB Extension Table 

baa AC | JCSWS | Flag byte 

| | X'80' EXEC LNKEDT statement 

| | to be generated 

| | | 40 EXEC statement to be generated 

| | 20 Skip link and execution, 

| | except for OPTION LINK 

| | 10 NEWVOL ignored 

| | LSTLOG 08 LISTLOG called for cancel 

| | ASIPL 04 ASI IPL 

| | ASICONT 02 Job Control first time 

| | activation passed 

| | JCLACTIV 01 Job Control active 

| 173 AD | JCSW6 Flag byte 

| | K'80' Reserved 

| | ONLNSYSG 40 On-line system generation 

| | 20 Reserved 

| | JOBLOGSW 10 Write job statement to HC file 

| | JCLOUTA 08 Alternate assignments exist 

| | | for SYSOUT 

| | SLAACTIV | 04 SLA active 

| | SYSPROC | 02 System procedure library in use| 

| | IJBFNSLB | 01 Allow to add system labels 

| | from this partition (Fn) 

| 174 AE | STDOPT2 Reserved for Job Control standard 

| | options (STDOPT) 

| | OPTNFSTR X'80' NOFASTTR 

| | OPTSDUMP 40 SYSDMP 

| | OPTPROC 20 PROC 

| | OPTPARM 10 PARM 

| | OPTJICNCL 08 JCANCEL 

| | OPTNHCTR 04 NCHCTRAN 

| | 02 Reserved 

| | 01 Reserved 

| 175 AF | TEMOPT2 | Job Control temporary options 

| | (OPTION statement) 

| X'80' NOFASTTR 

| | 40 SYSDMP 

20 PROC 

| | 10 PARM 

| 08 JCANCEL 

| | 04 NOHCTRAN 

| | | 02 Reserved 

| | O1 Reserved 

| 176-179 BO-B3 IJBJPL | Address of JPL of partition 

| 180-183 B4~B7 IJBAFCB Reserved for CICS 

| 184-187 B8—BB IJBPHLST Address of Fetch/Load Trace Table 

| 188-195  BC-C3 IJBJOBLG Address of last job statement on 

| 188 BC | Cycle byte of job statement 

| 189-193 BD-Cl | IJBDSKAD Disk address of job statement 

| 194~-195 C2-C3 | IJBDSKLR Logical record of job statement 
196-199 c4-C7 | IJBASPF Address of SPF control information 
200-203 C8-CB | IJBGVCTL Address of GETVIS control information 
204-207 CC-CF | IJBIJJT Address of Tape Open control block 
208-215 DO-D? | IJBSPNAM | System GETVIS partition pool 

| 216-223 D8-DF | IJBPHNAM Exec phase name 
224-227 EO-E3 | IJBDECPY Mirror DE entry chain 

4 + 

228 E4 {| COMREND j; End of partition communication region 


1 i 


Chapter 4. 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


| 
| 
| 
| 
| 
| 
: 
| 
| 
| 
| 
| 
| 
| 
| 


| 
| 
| 
| 
+ 


Supervisor Control Blocks and Areas 


4-83 


Licensed Material - Property of IBM © Copyright 


STORAGE MANAGEMENT 


Storage Management Control Block (SMCB) 


SMCB Address Table Format: 


eeee 


(ae ee ee ee me a ans | 
| Address | Address | Address | | Address | 
| of SVA | of BG | of Fn-1 | | of Fl | 
| Entry | Entry | Entry | | Entry | 
ae a oO 1h 
0 4 8 12 4xn 


IBM Corp. 


n = Number of partitions specified at supervisor generation (NPART) 


Note: 


The pointer to the SMCB Address Table can be found in the SYSCOM 


at offset 220 (X'DC'). 


=s 


1¢ < 


Length of SMCB 


i 
| SMCB Entry Format (SMCB) 
fe 1 
| DEC | HEX | Label | Description 
/—+—4 +—— 
| oO | O | SMAXPFIX | Partition: PFIX limit in pages 

| | System : SVA PFIX limit in pages 

2 | 2 | SMPFIX | Partition: PFIX count in pages 

| | | System : SVA PFIX count in pages 
| 4 | 4 | SMPSAVE Partition: Save area address 

| | System : Reserved 

8 | 8 SMVFLAG | Partition: GETVIS area flags 
| | | X'80' : SETLIMIT given indicator 
| 8 | 8 | SMVGVIS Partition GETVIS area address 
| | SMSGVIS | System GETVIS area address 
12 | C | SMVPBEG | Virtual Partition Begin Address 

| | | SMSVABEG | SVA Begin Address 
| 16 | 10 | SMVPEND Virtual Partition End Address + 1 
| | SMSVAEND | SVA End Address + 1 
| 20 | 14 | SMRPBEG | Real Begin Address 
| 24 | 18 | SMRPEND Real End Address + 1 
I + 
| | 
l 


Format of Storage Management Communication Area (SMCOM) 


Rye Gow Fi eee Ca ee FG eee ee rl Gin ME gw se Care 


Storage Management Communication Area (SMCOM) 


2 | eo 
| DEC | HEX | Label Description 
| Oo] © | SMALCVSZ | Allocated virtual storage in K. 
| 4 | 4 | SMFSVP | Size of fixed supervisor in pages 
| 6 | 6 | SMPPMIN Minimum page pool in pages 
| 8 | 8 | SMINSVPX | Minimum system real partition in 
| 10 | A | SMINPART | Minimum partition size in K 
| 12 | C | SMINSIZE | Minimum permanent virtual 'SIZE' 
{| 14 | £E | Minimum temporary virtual 'SIZE' 
{ 16 | 10 | Reserved 
{| 18 | 12 | Minimum temporary real 'SIZE' in 
{| 20 | 14 | SMINGTVS | Minimum permanent virtual GETVIS 
| 22 | 16 | Minimum temporary virtual GETVIS 
| 24 | 18 | | Reserved 
| 26 | 1A | Minimum temporary real GETVIS in 
+} _---|___— 
| 28 | 1c | < Length of SMCOM 


pages 


K 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


| rea ar ieee a ENN nv OC ee VY See eT 
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Format of the GETVIS Control Information Area (Anchor Table) 


| 
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GETVIS Area Control Information Layout (MAPGVCTL) 


—— 

| DEC | HEX | Label | Description | 
——__-—+ 

| 0 | 0 | ANCHDIR | Start of 51 CDLOAD Entries | 
| 1024 | 400 | BVIRTMEM | Pointer to begin of GETVIS area | 
| 1028 | 404 | EVIRTMEM | Pointer to end of GETVIS area | 
| 1032 | 408 | BVISTAB | Begin of VISTAB | 
| 1036 | 40¢ | EVISTAB | End of VISTAB | 
| 1040 | 410 | BSUBPIND | Begin of Subpool Index Table | 
| 1044 | 414 | ESUBPIND | End of Subpool Index Table | 
| 1048 | 418 | BSUBPCHN | Begin of Subpool Page Chain Table | 
| 1052 | 41¢ | ESUBPCHN | End of Subpool Page Chain Table | 
| 1056 | 420 | EGVCTLB | Last byte of control information | 
| 1060 | 424 | ENDGVCTL | End of control area | 
| 1064 | 428 | GTVSHIGH | Page Chain high water mark | 
| 1068 | 42¢ | FIRSTPNT | First page within empty pool 
| 1072 | 430 | CURPOINT | Start of chain of last used pages 
| 1076 | 434 | SSEARCH | New start search address (work field) 
| 1080 | 438 | SVWORK1 | Save area for register 1 
| 1084 | 43c | NBRGVPG | Number of pages in GETVIS area 
| 1086 | 43E | GTVSPGCT | Number of current used pages 
| 1088 | 440 | GTVSMXCT | Maximum number of pages to be used 
| 1090 | 442 | GIVSEXCT | Max. number of pages for excessive 
| | | | requestors 
| 1092 | 444 | MXSUBPLH | Maximum number of subpools available 
| 1094 | 446 | VISTAB | Begin of bit pattern 
| xxxx | XXX | | Begin subpool of Index Table 
| yyyy | YYY | | Begin subpool of Chain Table 
‘ ae 
| zzzz | ZZZ2 | <— Length of Anchor Table, depends on length of 
| | | VISTAB, Subpool Index Table and Subpool Chain Table 
een | J 

Note: 


The Anchor Table is located at the end of the virtual partition. It is pointed 
to by the partition COMREG (offset X'C8'). 


Due to compatibility reasons, the VSAM control information remains at the same 
location within the GETVIS area, i.e. it has the same offsets relative to PPEND 


as in former releases. The mapping macro for the VSAM control information is 


still MAPANCH and contains only this information. 


Format of Anchor Table Entry 


geese 
| Anchor Table Entry Layout (ATENTRY) 

ee T T 

| DEC | HEX | Label | Description 

p= ! 

| oO | 0 | ATPHSNME | Phase Name Field 

| 8 | 8 | ATLOADP | Load Point in GETVIS Area 

| 12 | C | ATENTP | Entry Point in GETVIS Area 

| 16 | 10 | ATPHSLEN | Length of loaded Phase 

{ 20] 14 | < Length of Anchor Table Entry (ATENTRY) 
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Space Control Block (SCB) Data Relationship for a /370 VAE System 


Low Core 
6) 250 254 


—+— 


a a —p 
| | ASCBATAB | SCBPTR | eee 


| | 
| 
V 


fa ae, a oe ge eet ae op wer gid Aan ed 
| ASCBR | ASCB1 | ASCB2 | ASCB3 {| ASCBS 
Ea 


SSS 


| 
eee J 


| 
| 
| 
| 
| 
| 
Steel 


T 
| 
l iP 
— ai 
| | Supervisor | 
Vv | 
a | F5 | 
| Space ID f { 
| 1) | 
| Size iz >| + 
| 
| SCBHPADR -—__—_— invalid | 
SCBLSADR > | 
}—-_—__-___ shared | 
| SCBRSTO/VSTO /-————>, | Partitions 
PIK String | | 
ne | SVA 
| | 
| 
| Space 2 
(ae ee | 
| | sed 1 
ti | Segment | 
Control Register 1 | Table of | 
| Space 2 | 
L } 
Space Control Block 
—_ T —=5~ tf 
| Bytes 
| Dec Hex | Label | Description 
eS t 
0 0 SCBID | Symbolic Space Identifier 
| predefined values: 
| 'R' for real space 
| '1' for primary virtual spaces 
| 'N' for additional virtual spaces (370) 
| 'S' for shared virtual spaces (370) 
2 2 | SCBSPN | Space number 
3-5 3-5 | | reserved 
| 6-7 6-7 | SCBSIZE | Size of allocated partition space in K 
lapadhays ote e kerala End of SCB of E and VM mode......... cece e cee eee eee 
| [8-11 8-B | SCBHPADR | Upper limit of private area 
} 12-15 C-F | SCBLSADR | Lower limit of shared area 
j 16-19 10-13 | SCBVSTO | Virtual address of segment table 
| 20 14 | SCBRSTO | Segment table origin for DAT 
| | SCBSTL | (length of segment table)/64-1 
| 21-23 15-17 | | reserved 
| 24-55 18-37 | SCBPSTR | PIK list of allocated partitions 


ps Wins © oe ee 
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MACHINE AND CHANNEL CHECK CONTROL BLOCKS 


Machine/Channel Check Control Block Relationship 


SYSCOM 
0 70 73 
{op og & kw Pr oe th ee ee. a eas! | 
| eee | IJBRASLN | eee 
ees —__+—_____1—__. at Fe | 
| 
po 
| 
V RASLINK RASTAB ERPIB 
4 > pO | | 
0| | | 0| | | 0| | 
ae | SS | SSS 
4| | | | | | | | 
——— | : : | : : 
8| | | ° e | e ° 
a | t——— | ; . 
c{ RASTABA #--———~ A4| ERPIBA }-————J ° . 
—as Sa | | 
e e e e | | 
e e e e | | 
| | | | | | 
| Secor | bse re il a 


RAS Linkage Area (RASLINK) 


| logout area 
X'80' Indicates field contents 


not valid 
CE ee ae ce Wr Sd Cee PTS SS EEN PO A DESO fa aE OP CPE SO Se ed 


a os pores > 
| Bytes | | | 
| Dec Hex | Label | Description 
| +— res 
| 0-3 0-3 | CPUIDW1 | First part of CPUID field 
| 4-7 4-7 | CPUIDW2 | Second part of CPUID field H 
J} 5 5 | CPUID | Model number in CPUID field | 
| 6 6 | RASMCELL | Length of machine check extended | 
| | | logout area 
| 8 8 | RASDMC | Damaged channel ID | 
| 9 9 | RASFLAGS | RAS flag byte | 
| | RASACT | X'80' RAS task activated | 
| RASMCACT | 40 Machine check handling | 
| | RASCCACT | 20 Channel check handling | 
| | RASEMGEX | 10 Emergency handling | 
| | RASSTERM | 08 System termination | 
| | | 04 Reserved 
| | RASNORTY | 02 Retry not possible | 
| | RTAIOA | O01 RAS task I/O active | 
| 10 A | MCFLAGS | Machine check flags 
| | MCHARD | X'04' Hard machine check 
11 B | RASRSFLG | RAS recording status flag 
| RASNOFCH | X'80' Fetch of R-transient fails 
| | 40 Reserved 
| | RASNOMSG | 20 Unrecoverable channel check | 
| | on SYSLOG | 
| | 10 Reserved 
| | 908 Reserved 
| RASBTDEQ | 04 BTAM dequeue request 
| | RASMSGRT | 02 Return from RAS message writer | 
| ' RASMSGIO- | 01 RAS message I/0 | 
12-15 C-F | RASTABA | Address of RAS monitor table (RASTAB)| 
16-19 10-13 | RASBASE | RAS base address | 
29-21 14-15 | RASIMOD | Internal model number | 
| 22-23 16-17 | RASIOELL | Length of I/O extended logout area | 
24-27 1C-1F | RASMCELA | Address of machine check extended | 
| | | 
| | | 
| | | 
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RAS Monitor Table (RASTAB) 


| Bytes 

Dec Hex 
{| O+3 0-3 
| 47 4-7 
| 8-11 8-B 
| 12-15 C-F 
| 16-19 10-13 
| 20-23 14-17 
| 24-27 18-1B 
| 28-31 1C-1F 
| 32-35 20-23 
| 36-39 24-27 
| 40-43 28-2B 
| 44-47 2C-2F 
| 48-51 30-33 
| 52-55 34-37 
| 56-59 38-3B 
| 60-63 3C-3F 
| 64-67 40-43 
| 68-71 44-47 
| 72-75 48-4B 
| 76-99 4C-63 
| 100-103 64-67 
{| 104-115 68-77 
{| 116-147 78-97 
| 148-154 98-9E 
{ 155 oF 
| 156-157 AO-Al 
| 
| 158-159 A2-A3 
| 160-163 A4-A7 
| 164-167 A8—AB 
| 168 AC 
| 
| 
| 169 AD 
| 170-171 AE-AF 
| 172-173 BO-B1 
| 174-175 B2-B3 
| 176-243 B4-F3 
| 
| 244-307 F4-133 
| 
| 308-311 134-137 
| 
| 308 137 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 312-323 138-13F 
| 312-313 138-139 
| 314-315 13A-13B 
| 316-319 13C-13F 
| 320-323 140-143 
| 324-335 144-14F 
| 324-325 144-145 
| 326-327 146-147 
| 328-331 148-148 
| 332-335 14C~14F 


Label 


LDOOSLOT 
LDOISLOT 
LDO2SLOT 
LDO3SLOT 
LDO4SLOT 
LDO5SLOT 
LDO6SLOT 
LDO7SLOT 
LDO8SLOT 
LDO9SLOT 
LD10SLOT 
LD11SLOT 
LD12SLOT 
LD1i3SLOT 
LD14SLOT 
LD15SLOT 
LD16SLOT 
LDi7SLOT 
LD18SLOT 


LD25SLOT 
RASCCB 
RASCCWS 
RASEEK 
RTAOWN 
MCPIK 


MCTIK 


ERPIBA 
CCENTADR 
RTAID 
RASRECID 
RASRTYID 
ERPID 
RASRES 
RASREC 
RASLOG 
TRANSAV 


SYSREGS 
SUPLINK 


LINKFLAG 
RASLIO 
RASLEMIO 
RASLFTCH 
RASLWAIT 
RASLPDEQ 
RASLDEQ 
RASLFREE 
RASLTIME 
RASLEXIT 
HIR 
HIRACNT 
HIRLCNT 
HIR1TME 
HIRLTME 
ECCMAIN 
ECCACNT 
ECCLCNT 
ECC1TME 
ECCLTME 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


© Copyright IBM Corp. 


Description | 
oo 
S$$RASTOO communication bytes | 
$S$RASTO1 communication bytes | 
S$SRASTO2 communication bytes | 
$SRASTO3 communication bytes | 
SSRASTO4 communication bytes | 
$SRASTOS communication bytes | 
S$SRASTO6 communication bytes | 
S$$RASTO7 communication bytes | 
SSRASTO8 communication bytes | 
$S$RASTO9 communication bytes | 
SSRAST10 communication bytes | 
$$RAST11 communication bytes | 
$SRAST12 communication bytes | 
SSRAST13 communication bytes | 
$$RAST14 communication bytes | 
SSRAST15 communication bytes | 
SSRAST16 communication bytes | 
$SRAST17 communication bytes | 
$SRAST18 communication bytes | 
reserved | 
SSRAST25 communication bytes | 
RAS CCB | 
RAS CCW chain | 
Seek address of RAS seek | 
R-transient identifier | 
Index to PIB active at machine | 
check time | 
Index to TIK active at machine | 
check time | 
Address of work ERPIB | 
Address of channel check routine | 
Requestor ID for RTA I/O { 
X'08' RAS recording request | 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


X'04' Channel retry request 
Return load index for WTOR 
Device address of SYSRES 
Device address of SYSREC 
Device address of SYSLOG 
RTA register save area, Register 0 
to Register 15 
RAS monitor register save area, 
Register 0 to Register 15 
Service routine address for RTA 
in RAS monitor 
Flag byte indicat. requested service 
X'80' Perform normal I/0 
40 Perform emergency I/0 
20 Fetch another transient 
10 Perform wait 
08 Dequeue page frame 
04 Dequeue CCB/IORB- 
02 Free I/0 extended logout area 
O01 Get timer value for RTA 
0O Exit from RAS transient 
Hardware instr. retry accumulator 
Accumulated HIR count 
Threshold value for count 
Time of day for first error of group 
Time threshold value in timer units 


Main storage error accumulators 


Accumulated ECC count for main stor. 
Threshold value for count 

Time of day for first error of group 
Time threshold value in timer units 


ee Oe | 
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RAS Monitor Table (RASTAB) (cont...) 


Description 


| Bytes | | 
| Dec Hex | Label | 
Es +— +— 
| 336 150 | MCMODE | 
| 337 151 | BUFDEL | 
| 338 152 | RASMSG1 = | 
| | MTICLDMG | 
| | MTIMDMG | 
| | MECQUIET | 
| | MPERFDEG | 
| | MEFLOVFL | 
| 339 153. | RASMSG2~ | 
| | MCLOKDMG | 
| | MLASTTR = | 
| | MPAGEDEL | 
| | MHIR | 
| | MECC | 
| MFILEFL 

| | MUNRCIO | 
| | MCRECOV | 
| | 

| 340-341 154-155 | RASIND | 
| | RASNODEQ’ | 
| 342-343 156-157 | | 
| 344-347 158-15B | RASPFT | 
| 348-356 15C-164 | INTERSEG | 
| 348-350 15C-15E | ILOGADR | 
| 351 15F | INOFN | 
| 352 160 | ILOGL | 
| 353 161 | IRECL | 
| 354 162 | NNOFN | 
| 355 163 | NLOGL | 
| 356 164 | NRECL | 
| a ae i 2 


5 ae 


Hardware operation mode 
Count of buffers deleted 
RAS Message byte 1 
X'10' Clock and or timer damage 
08 Timer damage 
04 Contr. stor. ECC in quiet mode 
02 System performance degradation 
01 EFL overflow 
RAS Message byte 2 
X'80' Clock damage, all modes quiet 
40 Threshold on rec-file reached 
20 Buffer pages deleted 
10 Soft MCI disabled 
08 ECC MCI disabled 
04 Recorder file full 
02 Error on recorder file 
01 Successful recovery from 
machine check 
RAS indicators 
X'80' Page frame not dequeued 
Reserved 
Page frame table pointer 
Interface segment build area 
Address of logout 
Sequence number: record one of n 
Logout length in record one 
Total length of record one 
Sequence number record n of n 
Logout length in record n 
Total length of record n 
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Error Recovery Procedure Information Block (ERPIB) 


a —T T 1 
| Bytes | | | 
| Dec Hex | Label Description | 
t =y Fee ae | 
| 0-7 0-7 | ERPIBCSW | Saved CSW | 
| 0 0 | ERPIBSTC | ERPIB status codes | 
| ERPIBFRE | X'FE' Indicate free ERPIB | 
| ERPIBCNG | X'FD' Indicate task is to be canceled] 
| ERPIBCCR | X'FC' Indicate retry unsuccessful | 
| ERPIBCCS | X'FB' Indicate retry successful | 
| a Pe ERPIBCCW | Address of failing CCW + 8 ! 
ERPIBST1 First status byte 
| 5 5 ERPIBST2 | Second status byte 
| 6-7 6-7 ERPIBCNT | Residual count in CSW | 
| 8-11 8-B ERPIBIOE | Pointer to corresponding I/O extended| 
| | logout area | 
| 12 Cc | Reserved | 
| 13 D ERPIBDMC | Damaged channel ID 
| 14-15 E-F ERPIBPUB | PUB address of failing device | 
| 16 10 ERPIBCQP | Channel queve pointer from the PUB | 
| 47 11 ERPIBRTC | RAS retry counter | 
| 18 12 ERPIBMSG | Message indicator | 
| | ACTMSG | X'80' Wait for operator response | 
| CCDONE | 40 Channel check handling complete| 
| CCNODEQ | 20 PUB not queued in error | 
| | 10 — 04 Reserved | 
| RECCC | 03 Recovered channel check 
| ERRCC | 02 Channel check | 
| | HRDCC | 01 Unrecoverable channel check 
| 19 13 ERPIBREQ | Requestor ID | 
{ 20 14 | ERPIBFLG | Flag byte | 
| | CCSIo | X'80' Channel check on SIO 
| | CCDAM | 40 Channel damage | 
| fb | 20 — 10 Reserved 
| | CCREC | 08 Record build or written | 
| | | 04 Reserved | 
| | CCDSK | 02 Channel check on disk device | 
| | CCSKM | O01 Skip message writer | 
| 21-23 15-17. | ERPIBESW | Extended CSW | 
| 24 18 | ERPIBEND | X'FF' End of ERPIB | 
a L J 


Track Hold Table (THTAB) 


{> =§$—<——_, 3 

| Bytes | 

| Dec Hex -| Label 
| 0 ) | THPTR 
| | 

| 143 1-3 | THCCB 
{4-11 4-B | THTRK 
| | 

| | 

| 12 Cc | THBWPTR 
| | 

| 13 D | THFLG 
| | 

| | 

| | 

| | 

| | THCTR 
| | 

| 14-15 E-F | THTID 


Description | 


Index of next entry in the forward | 
chain pointer (X'FF' = last entry) | 
Address of CCB/IORB | 
CKD dev.: Addr. of track (BBCCHHOO) | 
FBA devices: Physical block numbers | 
of first and | 
Index of previous entry | 
in the chain (backward pointer) | 
Flag and count byte | 
X'80' Another task is waiting for | 
this track/block | 

40 First entry within a PUB chain | 
20 —-10 Reserved | 
Bits 4-7: Number of concurrent | 
holds - 1 | 

Task ID of track/block owner | 
al 


ee 


Bytes 76-79 (X'4C' - X'4F') of the SYSCOM contain both, the free list pointer 
and the address of the Track Hold Table. 
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LOCK MANAGEMENT AREAS (DTLADR, LOCKADR, LOKOADR, DLFADR) 


Define the Lock (DTLADR) 
LOCKTAB Entry (LOCKADR) 
Owner Element (LOKOADR) 
DASD Sharing Dsect (DLFADR) 


Define the Lock (DTLADR) 


On entry to SVC 110 (X'6E') register 1 contains the address of DTL. 


© Copyright IBM Corp. 1985 


| Bytes | 
| Dec | Hex | Label | Description 
| [pean 
| o- 1]|0-1 | DILLENF | Length of DTL 
| 2 | 2 | DTLFLG1 | Flag Byte 1: 
| | | CONTROL option 
| | | | X’80' Reserved 
| | | | X'40' = Reserved 
| | | | X'20' Reserved 
| | | DTLEXC | X'10' | CONTROL=E(xclusive) 
| | | | LOCKOPT option 
| | | | X'08' Reserved 
| | | DTLOPT4 | X'04'  LOCKOPT=4 
| | | DTLOPT2 | x'02' — LOCKOPT=2 
| | DTLOPT1 | X'01'  LOCKOPT=1 
| 3 | 3 | DTLFLG2 | Flag Byte 2: 
| | | DTLKEEP | X'80'  KEEP=YES 
| | | DTLPART | X'40' | OWNER=PARTITION 
| | | DILREDC | X'20' | CHANGE=ON 
| | DTLEXTR | X'10' | SCOPE=EXT 
| | | DTLVOL | X'08' VOLID specified 
| { | x'04' = Reserved 
| | | x'02! Reserved 
| | | X'01' = Reserved 
4-15 | 4-F | DTLNAME | Resource Name 
16 — 21 {10 — 15 | DTLVOLID | Volume Identification 
| t 
+ 
22 | 16 | DTLLEN [| Length of DTL 
i L 1: c 
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LOCKTAB Ertry (LOCKADR) and Owner Element (LOKOADR) [ 


Relationship Between LOCKTAB and Owner Elements 


LOCKTAB Entries Owner Element Entries 
(Note) et Deen 
— -- -——>| 0 |T1| 
| ALOKTABA | | Lt 
| srl ge 
| pan ae ‘ 
————— | | TID| 
Vv | | Ee asec | 
ly Or tT 
LOCKTABA | | ‘a om 
ee 
A | 
| 
rn | f 
| | f 
| -—__}+——_ | 0 TID | Me 
v | 
SSS 
| | fe it 
tl... 
A | 
tn 
[ | 
SSS 
| | Fo eal 
[SS 
Vv | | to ey 
Soo 
| | a 
(1d 
A | 
Lf T_T 41 
| | | 0" ED 
| | aan Sa 
So. EE 
Vv | . | [ eae Wea | 
pte ot 
LASTLOCK = |_| |o| | 
[ eRe Lack rs eng et) OEE Receee me | 
Note: Identified via eye catcher 'LOCKSP' + 8 in pageable part of the a 


supervisor. + 


Free-list of Owner Elements 


If an owner element is freed, it will be put in front of the 


free-list. 
fe Se wae Se, Se RS et nfl a ee 
| [| | | | A 
| v | v | Vv 
oye a ++ ian roe | x 
LOKOFRL | | TID| | | TID| | | TID| | O |TID| Ss 
{ meade, eee | | Caierensec) meena | es Ee ( aeeeieee) aaa 
& 
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LOCKTAB Entry (LOCKADR) 
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Fer a ote = ae CO 


| Bytes | 
| Dec | Hex | 
}o-~ 3]{0-3 
oe oe ee 
| 16 | 10 

| | 

| | 

| | 

| | 

| | 

| | 

| | 

| | 

| | 

| | 

| 47 | 11 

| | 

| | 

| | 

| | 

| | 

| | 

| | 

| | 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


| 32 | 20 | 


Label 


LOCKCHN 
LOCKRESN 
LOCKFLG1 


LOCKEXC 


LOCKFLG2 
LOCKUSED 
LOCKPART 
LOCKWAIT 
LOCKEXT 


LOCKGNTE 


LOCKPTR 
LOCKBPTR 


LOCKLEN 


| Description | 


| Chain pointer to Owner elements | 
| Resource Name | 
| Flag Byte 1: | 
| CONTROL option | 
| X'80' Reserved | 
| X'40' = Reserved | 
| x'20! Reserved | 
| X'10'  CONTROL=E(xclusive) | 
| LOCKOPT option | 
| X'08' Reserved 
| x'o04' LOCKOPT=4 
| X'02' LOCKOPT=2 | 
| X'01'  LOCKOPT=1 | 
| Flag Byte 2: | 
| X'80'  LOCKTAB entry in use | 
| x'40' LOCK owned by partition | 
| X'20' Task waits for resource | 
| x'10' Cross system lock | 
| X'08' Reserved 
| X'04' = Reserved 
X'02' Reserved | 

| X'01' Reserved | 
| Number of exclusive users | 

Reserved | 
| Forward chain pointer | 
| Backward chain pointer | 


| Length of LOCKTAB Entry | 


i a |] 


| Bytes | 
| Dec | Hex | 
}o- 3]/o0-3 | 
1|4- 5|4-5 | 
1}6- 7 {6-7 | 
{s8- 9|8-9 

| 10 | oA | 
| | 

| | | 
| | 

| | 

hh ov | B 

}12 - 15 | C-F 

| 16 | 10 | 


ee et 


Label 


LOKOCHN 
LOKOTID 
LOKOCNTS 
LOKOCNTE 
LOKOFLG 
LOKOKEEP 


LOKOEXC 
LOKOFLG2 


LOKOLEN 


| Description 


Chain pointer to next Owner Element 
Task Identification of owning task 
Number of shared users 
Number of exclusive users 
Flag Byte: 
x'80' Keep until end of job 
x'40' Reserved 
X'20' Reserved 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
: 


x'10' Exclusive usage 
Flag Byte 2 
Reserved 
| Length of Owner Element 
A | 
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DASD Sharing Dsect (DLFADR) \ 
| Bytes | | | 
| Dee Hex | Label | Description | 
$$ $$$} + — 
l........ First 20 bytes of lock file header record ............. aceteceiih 
{| O- 1  O-~ 1 | DLFCHAR | Block identification 
| 2- 3  2- 3 | DLFNCPUS | Number of sharing CPUs | om 
| 4- 5 4- 5 | DLFLBLK | Physical block length | & 
| 6- 7 6- 7 | DLFNBLK | No. of physical blocks in data area | \ 
f 8- 9 8-— 9 | DLFNENT | No. of entries per block | st 
| 10-11 A-— B | DLFLENT | Length of one lock entry (12+NCPU) | 
{ 12-13  C- D {| DLFBLKLL | Lower limit on FBA | 
| | DLFCYL | Cyl. address of external file (CKD) | 
|} 14-15 E-— F | DLFREC# | Number of blocks per track (CKD) | 
[| 16 -~ 17 10 — 11 | DLFTRCK# | Number of tracks per cylinder (CKD) | 
| 18 12 | DLFDEVT | Flag — device type | 
| | DLFRPS | xX'O3' External file on RPS CKD | 
| | DLFCKD | 02 External file on CKD | a 
| | DLFFBA | 01 External file on FBA | ( 
| 19 13 | DLFDEVC | Device code f u 
[....eee0eeeeeee. Start of 8 byte CPU field ................ siietene araclavete ts | . 
; 20 14 | DLFCPUS | Start of 8 byte CPU field i 
i | DLFCPUF1 | Flag byte 1 in CPU entry | 
| | DLFcPUUS | X'80' CPU field in use 
| 20 —~ 2% 14-15 | DLFUNF | Channel and unit of external file | 
| 22 —- 23 16-17 | DLFPUB | PUB index (for physical addressing) | 
f 24 18 | DLFFLG1 | Flag — byte 1 | 
| | DLFINT | .X'80' DSHRINIT processed successful | 
| | DSHRDOWN | 40 DASD sharing support down | 
| I | (1/0 error) | 
| | DLFACT | 20 DASD sharing support is active | 
| | DSDWNMSG | 10 DASD-SHR-DOWN message to be i 
| | | displayed | 
| | DLFCHAIN | 08 write chained to device release} 
fo 25 19 | DLFFLG2 | Flag — byte 2 (reserved) | 
| 26 - 27 1A —- 1B | DLFINDEX | Number of this CPU (0 until NCPU-1) | 
PArte deen aaatne hie End. of -IPE DLE table sacse cee cecie pie hanes ode | 
i 28 1¢ | DLFLENI | Length of DLF table (for IPL) | 
[scar seen Rada iRete ante settee Ce araceh atc Rental ag tae Aenea Mate athe Si mated On Cte Eh | 
| 28 - 31 1C ~ 1F | DLFAREA | I/O area for external file 
| 32 — 33 20 — 21 | DLFHBLK | Actual block in lock file (hash no.) | 
— ae | | 
| 34 22 | DLFLEN | Length of DLF table (full length) | 
* This DSECT is used to address the DASD sharing interface table fs 
* (DLFTABLE). f 
* It is used by the lock manager and the IPL routines. \ 
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The first part (fields DLFCHAR till DLFEOVC) describes the 
external file itself. It contains information which is 


valid for any sharing CPU. 


The second part (DLFUNT till DLFHBLK) contains information 
specific to the various sharing CPUs . 


Note: The header record of the external file contains the 
first part of the DLFTABLE followed by the 8-byte 
CPU-fields (each consisting of the flag bytes and 
a 6-byte CPU-identification). 


IBM VSE/Advanced Functions Handbook 


a 


Licensed Material - Property of IBM © Copyright IBM Corp. 1985 


( F DISK INFORMATION BLOCK (DIB) TABLES 


Disk Information Block (DIB) Table for CKD and DISKETTE Devices 


r 1. T T T T T T 7 
Current |Length of|End of Extent|Head No.|Max |Notify |Flag| 
{Record Addr.|Key|Data | Address |High|Low|Rec.|Rec.No. | | 
0 6| 7 |8 9|10 16| 17 | 18] 19 |20 21| 22 | 23 
Byte(s) | Description 
Ss 
od | © CURRENT | Specifies the disk address of the next sequential 
RECORD | record. The format differs slightly depending 
ADDRESS | on the file and the device. 
| For CKD-devices: For DISKETTE-devices: 
| SYSIN  : BBCCHHR SYSIN : OOOOCHR 
| SYSPCH : BBCCHHR SYSPCH : OOOOCHR 
| | SYSLST : BBCCHHR SYSLST : OOOOCHR 
| 
re \ | 7 KEY LENGTH| Always zero | 
: 3 } 4 if 
Sd | 8 DATA LENGTH] Data length of record to be processed | 
| For CKD-devices: For DISKETTE-devices: | 
| SYSIN : X'0050' or X'0051' SYSIN  : X'0000' | 
| SYSPCH : X'0051' SYSPCH : x'0000' 
| SYSLST : X'0078' _ SYSLST : X'0000' 

10 END of | Specifies the disk address of the last record | 
| EXTENT within the given extent. | 
| ADDRESS For CKD-devices: For DISKETTE-devices: | 

SYSIN  : BBCCHHR SYSIN  : OOQOOCHR | 
SYSPCH : BBCCHHR SYSPCH : OOOOCHR 
SYSLST : BBCCHHR SYSLST : OOOOCHR 
F | 
| 17 HIGHEST | Highest head number accessible on this device. [ 
HEAD NO. | 
| 
| 18 LOWEST Lowest head number accessible on this device. | 
HEAD NO. | | 
| 
; 19 MAXIMUM NO.| Maximum number of records that fit on one track. | 
i of RECORDS | 
| 
\ | 20 NOTIFY This field specifies the number of records that | 
| RECORD the user wants to be checked at EOJ time of whether | 
! | NUMBER they still fit into the specified extent 
(applicable for output only). This field is set by | 
the JCL SET statement (RCLST or PCPCH). A warning | 
F message will be issued when this minimum number has | 
od been reached or exceeded during the previous JOB. | 
| | 22 FLAG BYTE Flag byte: X'40' Device with RPS feature | 
- 

23 RESERVED Not used | 
f 

Note: The DIB is initialized by Job Control with Extent Info. and | 

updated by PIOCS on every 1/0 oper. to the appropriate device. | 


‘ : y Bytes 96-97 (X'60' - X'61') of the Partition 


address of the DIB Table. 
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Disk Information Block (DIB)} Table for FBA Device 


mean? 2 ae 7 
| Bytes | | | 
| Dee Hex | Label | Description 
— —o 4 
| 0-3 0-3 | ULPBN | End address of extent. Upper limit | 
| | | of physical block number | 
{| 4-7 4-7 | CRPBN | Current address. Current 
| | | physical block number | 
| 8-9 8-9 | CIOFF | Offset of current record within | 
| | | control interval | 
{ 10-11 A-B | LNGCI | Length of control intervals in bytes | 
| 12 Cc | PBPERCI | Number of physical blocks per | 
| | | control interval 
| 13-15  D-F | PBUFFER | Pointer to data buffer 
| 16 10 | DIBFLAGS | X'80' DIB gate flag | 
| | | X'40' Task waiting for DIB | 
| | X'20' Reserved { 
| | | X'10' Source begin readjustment | 
| | | required | 
| | | X'08' Reserved | 
| | | X'04' Force write out | 
X'02' End of extent hed 
| | | x‘o1' Bateerunades flag ; | 
| 47-19 11-13 | PDIBX | Pointer to DIB extension (DIBX) | 
| 20-21 14-15 | DIBRSCNT | Residual count for JCL message | 
| 22-23 16-17 | | Reserved | 
Les 25 ae L j 


DIB Extension Table (DIBX) for FBA Devices 


The FBA device also requires a DIB Extension (DIBX) Table. 


{ T —} 
| Bytes | | 
| Dec Hex | Description | 
- _ : 
| 0-23 0-17. | Input Output Request Block (IORB) | 
| 24-31 18-1F | Fixlist first area | 
| 32-39 20-27. | Fixlist second area | 
| 40-47 28-2F | DEFINE EXTENT CCW | 
| 48-55 30-37 | LOCATE CCW | 
| 56-63 38-3F | READ/WRITE CCW 
| 64-79  40-4F | DEFINE EXTENT Parameter list 
| 80--87 50-57 | LOCATE Parameter list 

| 


[ See ae Caer eae! (SI 
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ERBLOC Area 
— E = ea | 
| Bytes | | | 
| Dec Hex | Label | Description | 
es et = 
| 0-7 0-7. =| SVC5SNM | Name of first/next ERP Transient | 
| | | to be fetched | 
| 8-11 8-B | YRETRY | Continuation address for retry | 
| | | I/O request (INITRG) 
| 12-15 C-F | YIGNORE | Continuation address to ignore | 
| | | I/O error (IGNORE) | 
{| 16-19 10-13. | ACANCEL | Continuation address to cancel | 
| | | I/O request (ERR1A) | 
| 20-23 13-17 | YERPEXIT | Common DSK/ERP return address | 
| | | (ERPEXIT) | 
| 24-75 18-4B | ERQI | Area to pass recovery and recording | 
| | | information to the ERP. | 
| | | Its layout is the same as for | 
| | a single error block, except for | 
| | | the 8-byte header (see Note) | 
| 76-111 4C-6F | SNSSDAID | Sense data saved by SDAID | 
| 112-119 70-77 | ERCHNOFT | Chain header offset table, used to | 
| | | address the following error chains | 
| 120-123 78-7B | RASERCHN | Address of first RAS error entry | 
| 124-127 7C-7F | | Pointer to RAS TIB | 
| 128-131 80-83 | ERPERCHN | Address of first ERP error entry | 
| 132-135 84-87 | | Pointer to ERP TIB | 
| 136-139 88-8B | DSKERCHN | Address of first DSK error entry | 
| 140-143 8c-8F_ | | Pointer to DSK TIB | 
| 144-147 90-93 | SNSERCHN | Address of first SNS error entry | 
| 148-151 94-97 | | Pointer to SNS TIB | 
[ Epon ence aoeeee j 


Bytes 0-3 (X‘'00 - X'03') of the System Communication Region contain 
the ERBLOC area. 


There is one I/O error block for each device. Field PBXERBLK in the 
contains a pointer to this block. 


An additional error block exists for some system tasks. The address 
block is contained in field TCBERBLK of the system task TCB. 
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XPCC CONTROL BLOCKS (IDCB, CRCB} 


Identification Control Block (IDCB} 
Connect Request Control Block (CRCB) 


Identification Control Block (IDCB) 


c y-eer T 1 
[ Bytes | | | 
|. Dee Hex | Label | Description \ 
b= t | 
f OO 3 0-3 | XPIDPT | Pointer to next ID-CB 

| 4-7 4-7 | XPICRPT | Pointer to first CR-CB | 
| 8-9 8- 9 | XPIPART | Offset to that part of CR-CB which | 
| | | belongs to current application i 
| 10-11 A- B | XPITID | TID of ID-CB owner 

| 12-13 C— D | XPIMTID | TID of corresponding maintask | 
| 14-21 E-15 | XPIMTID Identification key (token), | 
| 22-29 16-1D | XPIAPPL | Application name [ 
| 30-31 1E-1F | XPICRQS Number of requested connections i 
| 32-33 20-21 | XPICNTR Number of open connections 

| 34 22 | XPIFLG1 Flag byte | 
| | xprsuBS | xX's80' IBM-subsystem i 
|. | XPITMQ | 40 Application issued TERMQSCE | 
| | 20 Reserved | 
| | | 10 Reserved | 
i | | 08 Reserved | 
| | 04 Reserved | 
| | | 02 Reserved | 
| | | 01 Reserved | 
| 35 23 | XPIFLG2 | Flag byte (reserved) | 
| 36 24. | XPIDEND | Length of IDCB 
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Connection Request Controi Block (CRCB) 
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f =a? T 1 
Bytes i 
Dec Hex | Label | Description 
i + 5 4 
0~ 3 0- 3 XPZTCBC | TCB chain pointer 
| 4-11 4— B XPZCRTK Path-id (connection request token) 
12-15 C- F | XPZBUFAD SEND buffer address 
12 Cc | x'80' Last buffer of a list 
16-19 = 10-13 XPZBUFLN | Buffer length 
20-67 14-43 | max. 7 entries in list 
68-71 44-47 | XPZTOTAL Total buffer length 
72-75 48-4B XPZREPLY Address of reply area 
| 76 40 XPZFLAG Flag in user area 
77-79 4D-4F XPZRPYLN | Reply area length 
80-87 50-57 XPZUSER | User data 
88-93 58-5B XPZSPACE {| SCB pointer of partner 
92 5C XPZFCT | Function code | 
93 5D XPZFLG1 Flag byte | 
XPCONCL X'80' Connection is completed 
XPCONBSY 40 Connection is busy 
XPCINTCB 20 In TCB chain 
| 10 — 04 Reserved | 
| XPZCONPE ij 02 Connection exit pending 
&PZRPOST O1 Post at receive after SENDR 
94 SE XPZFLG2 Flag byte (reserved) 
| XPTERMAB | X'SO' Other side terminated abnorm. 
XPTERMNO 40 Other side terminated normally 
XPDSCED 20 Other side disconnected 
| 10 — 04 Reserved 
XPINOVM | 02 Partner in other VM machine 
XPCURRSP O01 Both part. in current space 
95 5F XPZREAS Reason code 
4 
“T 1 
| 96 60 XPZCEND Length of Common Part 
L 4 
t 
Se at Tayra bets te te chen as Block of First Communication Partner ..................| 
96- 99 60-63 XPZNXTCR Pointer to next CR-CB 
100-101 64-65 | XPZPART Offset to that part of CR-CB which 
belongs to current application 
102-103 66-67 XPZTID TID of connect owner 
104-107 68-6B XPZPCCB XPCCB address 
108-111 6C-6F | XPZIDADR | Address of corresponding IDCB 
} 112-119 70-77. | XPZTOAP To-Application name 
| 120 7 XPZFLG3 Flag byte 
XPSEND | X'80' SEND pending | 
XPSENDR 40 SENDR pending | 
| | XPCLEAR 20 Sender cleared request 
| XPRECVE 10 Receive after SENDR executed 
| 08 — 01 Reserved 
121-123 79-7B Reserved 
| eeecoseus aya tease axes End. Of Rirst sPattrac vita ft bcc sen chard Miecane tecde Ved Ee ac 
| 124 7C XPZFEND Len. of First Partner + Common Sect. 
ict eae een ne Gals. Block of Second Communication Partner ..........0 ee eeee 
| 124-127 7C-7F | | Pointer to next CR-CB 
128-129 80-81 | Offset to that part of CR-CB which | 
| belongs to current application | 
130-131 82-83 | TID of connect owner 
132-135 84-87 | XPCCB address 
136-139 88-8B | Address of corresponding IDCB 
140-147 8C-93 | To-Application name 
148 94 XPZFLG3# Flag byte 
| X'80' SEND pending 
| 40 SENDR pending ; 
| 20 Sender cleared request 
| 10 Receive after SENDR executed | 
| | 08 - 01 Reserved 
{ 149-159 95-9F | | Reserved 
cee ee are Cea = 
| 160 AQ | XPZREND Totai Length of CRCB | 
Yo I 
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PDTABB AND PDTABA TABLES 


Bytes 126 and 127 (X'7E'-X'7F') of the partition communication region contain 
the address of the Paper Document processing Table. 


Label PDTABB identifies the first byte of the table. The tables are used for 
handling external interrupts on magnetic ink or optical character recognition 
devices. 

PDTABBB contains six 8-byte entries; one for each line of the direct control 


feature on the system. 


Table for MICR DTF Addresses Entries (PDTABB) 


| BYTE | AND INSTRUCTION | OWNER | DTF ADDRESS for MICR | 
| DEC HEX | | | | 
| 0 0 | NI PDSTAT+1,X'FE' | TID | Device on LINE 7 | 

————— 
| 8 8 | NI PDSTAT+1,X'FD' | TID | Device on LINE 7 | 
i; 16 10 | NI PDSTAT+1,X'FB' | TID Device on LINE 7 | 


| 
| 24 18 | NI PDSTAT+1,X'F7' TID 1 Device on LINE 7 | 
| 32 20 | NI PDSTAT+1,X'EF' aap r Device on LINE 7 | 
| 40 28 | NI PDSTAT+1,X'DF' | TID | Device on LINE 7 | 


FoF a i ee aa hg ee ee eae ee ee es ey 
| Bytes | Description 


| The NI instruction is executed in the external | 
| Signal Interrupt handler to turn off the external | 
| line status as soon as this line interrupt is being | 
| processed (any other external line signal remains | 
| affective). | 
| PDSTAT+1 is the fixed main STORAGE location 135 (x'87') | 
| and contains the external signal codes that have not yet | 
| been processed in Bits 2-7. 


| 

a — 

| Bits | Description | 

| 7 | External signal from line 7 | 

| 6 | External signal from line 6 | 

| 5 | External signal from line 5 | 

| 4 | External signal from line 4 | 

| 3 | External signal from line 3 | 

| 2 | External signal from line 2 | 

4 | Contains the PIK of the partition containing the DTF | 


| 
| 
| 
| 
| 
| 
| 
| 
ee | 
| 
| 
| 
| 
| 
| 
| 
| 


5-7 | Contain the address of the DIF table 


Note: The contents of PDSTAT+1 (bits 2-7) is used to index a one byte entry in 
table PDTABA which, in turn indexes the DIF address entry, whithin table PDTABB 
of the external signal line with the currently highest priority. (Line 2 has 
highest, line 7 lowest priority). 


Ny 
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~~" RECORDER FILE TABLE (RFTABLE) 


Recorder File Table Relationship 
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SYSCOM 
: 0 64 67 

—_ | soe | ISBRFTAB | see 
LS Se Sen 

| 

| 

, fl 

| 

| 

V RFTABLE 
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Recorder File Table (RFTABLE) 


le 7 7 
| Bytes 
| Dec Hex Label Description 
| 
RFTABLE Label of Starting Address 
0 0 RFFLAGS1 Flag byte 1 
RFFULL X'80' File full 
RFRDE 40 RDE option included 
RFIPL 20 Initial IPL 
RFNO 10 RF=No option 
RFCREATE 08 File is to be created 
| RFBUILT 04 File has been created | 
| RFONFBA 02 File on FBA device 
| RFREADY Ol File ready 
| 1 oe RFFLAGS2 Flag byte 2 
| FFMSG X'80' File full message request 
| LTMSG 40 Last track message request 
| | IEMSG | 20 I/O error message request 
| | DLMSG 10 Data lost message request 
| RFEVA 08 EVA message request 
RFRTAOWN O04 File owned by RTA recorder 
| RFPTAOWN 02 File owned by PTA recorder | 
| | RFEREP 01 File being accessed by EREP 
2 2 | RFFLAGS3 Flag byte 3 
| LTMISSUD X'80' Last track msg issued once 
| | RECDERR 40 Error is to be recorded 
| | RECDSF 20 Short form record request 
| RFIRULT 10 Individual records for 
| unlabeled tapes 
| 08 Reserved 
RFHIOERR | 04 Error in writing RFHEADER 
| | RFBOMTOS 02 Exit to $$BOMTOS5 
| indicator for $SBOPEN 
RFBOMTO1 ol Exit to $$BOMTO1 
| indicator for $$BOPEN 
| 3 3 RFFLAGS4 | Flag byte 4 
| | x'80' — X'02' Reserved 
| RFRNW OL No record written 
4 4 RFFLAGS5 Flag byte 5 
| X'80' ~ X'02' Reserved 
| RFFLG5SBD | Ol BOPEND called by OPEN 
5 5 RFNOFN N of N for records (low order 4 bits | 
| contain the number of records to be 
| recorded and high order 4 bits cont. 
| | the nbr of the record being recorded) | 
6 6 RFRECTYP Record type code | 
7 7 | RFREL Release level code of VSE/Adv.Funct. 
8 8 RFRDSW1 | Record dependent bit 1 
| RFTEMP | X'40' Temporary error | 
| 9 9 | RFRDSW2 Record dependent bit 2 
10-11 A- B | RFBUFLG Length of data buffer (FBA) 

SO Oe eo CKD Device Related Information ............ eee eee eee ee 
{ 12-13 C— D | RFMCONST | Multiplier for track balance | 
| 14-15 E- F | RFDCONST | Divisor for track balance | 

16-17. 10-11 | RFOCONST j Overhead for track balance | 
| 18-19 12-13 | RFRECLEN | Length of record 
| 20 14 | RFRDSW3 | Record dependent switch 3 | 
| 21-23 15-17 | Reserved | 
| 24-27 18-1B | RFRECADR Address of record 
| 28-34 1C-22 | RFSEEK Work area for seek addr.BBCCHHR 
| 28-29 1C-1D | RFSEEKBB BB portion of seek 
| 30-31  1E-iF | RFSEEKCC | CC portion of seek 
| 32-33 20-21 | RFSEEKHH | HH portion of seek 
34 22 | RFSEEKR R portion of seek 
| 35 23 | RFEREPK Key of EREP partition 
| 36-39 24-27 | RFHDRCH SYSREC cylinder/head 
| 36-37 24-25 | RFHDRCYL |! Cyl. address of file start 
| 38-39 26-27 | RFHDRTRK Head address of file start 
[evel asslarinentand End of CKD Device Related Information .................. 
= : {__- i _} 
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Recorder File Table (RFTABLE) (cont...) 


Label 


7 


| 
| 


Wo siesh aains AER aan FBA Device Related 


36-39 24-27 


50 32 
51 33 
52-55 34-37 
56 38 
| 57 39 


| 
| 
| 
| 
| 
| 
| 


| 
| 
| 
| 
| 
| 
| 
| 
| 


RFBUFAD 
RFNAVR 


RFRECLEN 
RFRDSW3 


RFRECADR 
RFCUBL 


RFEREPK 
RFHDRBL 


RFCHMAP 
RFCHIDC 
RFRDSWO 


RFEXIT 
RFEVARTH 
RFEVAWTH 
RFP2ENTL 
RFP2ENT 
RFP2ITAB 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


Description 


INFOTMAC LON? ie Wreeeestioted Mee WE Sa es 
Address of data buffer 
Displacement of next available RDF 
in buffer (FBA) 

Length of record 

Record dependent switch 3 

Reserved 

Address of record 

Work area for block number 
Reserved 

Key of EREP partition 

SYSREC block number 


See er eae End of FBA Device Related Information .................. 


Map of supported channels 
Channel ID codes 

Record dependent switch 0 
Reserved 

Exit phase name or exit address 
EVA read threshold 

EVA write threshold 

Length of PUB2 table 

Address of PUB2 table 

PUB2 index table (see Note) 


Note: Two bytes are generated for each PUB2 index entry. 


Console Buffer Table (CBTAB) 


Label CBTAB identifies the first byte of the Console Buffer Table. 
Label CBNEXT points to the next free entry within this table. 


© Copyright IBM Corp. 1985 


fy ge ee ee ee rr oe Oe 


j Bytes 
| Dec Hex 


24-103 18-67 


CBDATA 


Description 


CCW: 

Command code, chain byte and count 
have been copied from the user's CCW. 
The data address is always the addr. 
of CBDATA (byte 24-103 see below). 
CCB: 

An area in CCB format whose CCW 
address field always points to CBCCW 
(see bytes 0-7 above). 

Console Buffer: 

An output area in which the user's 
data is kept 


| 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
}~ 
| 
| 
! 
| 


= Se 


Chapter 4. 


Supervisor Control Blocks and Areas 


4-103 


Licensed Material - Property of IBM © Copyright IBM Corp. 1985 
CRT AREAS (CRTTAB, CRTSAV) 


SYSCOM 
0 34 37 
facto «tt <4 BaP eee  — Bots to et eT | 
| eee | IJBCONSP | eee | 
—— eee ee | 
| 
-——_-_----s 
| 
V CRITAB CRTSAV 
rr | eo 
0| | | of | 
4 | | 
4| | | | | 
| ° e 
8| ACRTSAV /}———— ° ° 
| | | | 
Cc 
4 S34 
i e e e 
| | | | 
re | 


CRT Constant Table 


| Bytes | 
| Dec Hex | Label | Description . | 


| 0-7 0-7 | CRINAME | Name of CRT routine | 
| 8-11 8B | ACRTSAV | Address of CRT save area (CRTSAV) | 
| 8 8 | CRTNAM1 | Phase Identifier | 
| | | Last character of phase that is | 
| | | to regain control after Attention | 
| | | Interrupt or I/O error are processed. | 
| 8 8 | SENSEBT | Dummy sense byte | 
| | X'80' Command reject | 
| | | 40 Operator intervention required | 
{ | | 20 Reserved | 
| | | 10 Equipment check | 
| | | 08-02 Reserved | 
| | | 01 Operation check | 
| 12-15 C-F | ACRTTRNS | Address of C-Transient area (CRTTRNS) | 
| 16-19 10-13 | AATTNINT | Address of Attention interface rout. | 
| 20-23 14-17 | ACRTUNPS | Address of CRT deactivation routine | 
| 24-27  18-1B | ACRTNWSO | Service owner of CRT | 
| 28 1c | CRTIFLG1 | Flag byte 1 

{ | CRTERPBT | X'80' ERP message | 
| | CRTUNITC | 40 Unit check for CRT SYSLOG requ. | 
| | CRTFETCH [| 20 Fetch of $$BOCRTK is in progr. | 
| | CRTATTH | 10 Device end simulated | 
| | CRTERADR | 08 Validation error | 
| | CRTREDSP | 04 Redisplay in progress | 
| | CRTERR | 02 CRT I/O error | 
| | CRTBUSY | 01 CRT busy | 
| 29 1D | CRTIFLG2 | Flag byte 2 | 
| | | X'80" Reserved | 
| | CRTSENS | 40 Sense Byte (see byte 8) was | 
| | | set up by CRT | 
| | CRTEOJ | 20 End of CRT routines | 
| | CRTDATRD | 10 Data already read | 
| | CRIATTPD | 08 Attention Interrupt pending | 
| | CRTRQPD | 04 Request pending | 
| | CRTATTRQ | 02 Attention request being handied| 
| | CRTEOJO | 01 EOJ on CRT | 
| 30-35 1E-23 | CRTEINF | CRT error information 

| 36-39 24-27 | AHCFIOMD | Entry address of I/O module | 
| | | | 


for hardcopy file access 
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CRT Save Area (CRTSAV) 


| Bytes | | | 
| Dec Hex | Label | Description | 


| 0 0 | CRTSAV | CRT save area — | 
| | | Set on doubleword boundary | 
{ 0-7 0-7 | SAVOLDP | Save area for old SVC PSW | 
{ 8-11 8-B | ACRTSAVA | Address of problem program save area | 
| 12-55 C-34 | CSAVEAR | Channel scheduler save area | 
{ 12-15 c-F | CRTSV1 | save area for register 1 | 
[ {| CCBSAVAR | CCB address | 
| 16-19 10-13 | CRTSV2 | save area for register 2 | 
| 20-23 14-17 | CRTSV3 | save area for register 3 1 
| 24-27  18-1B | CRTSV4 | save area for register 4 | 
| 28-31 1C-1F | CRTSVS5 | save area for register 5 | 
| 32-35 20-23 | CRTSV6 | save area for register 6 | 
| 36-39 24-27 | CRTSV7 | save area for register 7 | 
| | CRTPSWM | Save area for CRT system mask | 
| 40-43 28-2B | CRTIOSB | save area for IOS base register | 
| 44-47  2C-2F | CRTINTER | Address of I/O interrupt routine | 
| 48 30 {| CRTCCBB1 | save CCB communication byte 1 | 
| 49 31 | CRTCCBB2 | save CCB communication byte 2 | 
| 50 32 | CRTCCBB3 | save CCB communication byte 3 | 
| 51 33 | CRTATTRB | Message attribute byte | 
|—————— Constants needed for CCW processing | 
| 56-63 38-3F | CRTCCWO | CCW for write screen control char.s | 
| 64-71 40-47 | CRTCCW | CCW built by CRT routines 
| 72-79 48-4F | CRTCCB | CCB modified by CRT routines | 
| 80-83 50-53 | | CCW address | 
| 84 54 | | Flag byte | 
| 85-87 55-57 | | CSW CCW address | 
| 88-95 58-5F | | CCW | 
| 96-99 60-63 { CRTSNSI | CRT sense information | 
| 100-103 64-67 | | ASUPSAVA | Address of SUP system task save area | 
| 104-107 68-6B [| CRTNEXT | Next CCW to process 
| 108-111 6C-6F | ACTLCCW | Address of actual CCW | 
] 112-115 70-73 | CONTCCW | Address of cont. CCW | 
| 116-117 74-75 | CONTRDSV | Save byte count of cont. CCW | 
| 118 76 | ATTLENG | Length of attention input | 
| 119 77 | CRTNAM2 | Save area for CRT char. in error case| 
| 120-121 78-79 | CRTUTID | TID of task requesting CRT | 
| 122-123 7A-7B | CRTUPIK | PIK of task requesting CRT | 
| Constants needed for hard copy processing | 
| 124 7C | CRTHCPIK | Translation PIK for cont.—lines 
| 125 7D | CRTFLGHC | Flags for Hard copy file (HC) | 
| | CRTHCOPN | X'80' HC opened 
| | CRTHCOVR | xX'40' HC in overlay mode 
| | CRTHCWRN | X'20' Warning (2 tracks left) sent | 

| CRTIPL | X'10' HC IPL switch | 
| | HF TOOPEN | X'08' HC must be created 

HFEQUNO X'04' HC not in use 

| | HCERR | X'02' HC has unrecoverable error | 
| | HCINCL | X'O1' Incorrect length during | 
| | | HC disk 1/0 
| 126 7E | PRTLOCK | Lock for PRINTLOG function | 
| | X'00' — open, X'FF' —- closed | 
| 127 7F | HCFLG | Flags for Hard copy file support | 
| | OVERLAY | X'80' HCF in overlay mode | 
| | PRINTLOG | X'40' PRINTLOG no select active | 
| | HCINCERR | X'20' Inconsistent state in HC~supp. | 
| | NOTCMPLT | X'10' HC file not yet full 
| | | xX'08' Reserved 
| | | X'04' Reserved 
| | | X'02' Reserved 
| | | X'01' Reserved 
l en ore 4 es 
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CRT Save Area (CRTSAV) (cont...) 


f Bytes 


{ Dec 


ee 


128-131 


132-135 


136-137 
138 
139 

140-141 

142-149 

150-155 


| 

| 

| 

| 

| 

| 

| 

| 

| 

| 156-163 
| 164-165 
| 166-167 
| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 

| 


168-169 


170-177 
178-201 


204-205 
206-207 
208 
209 
210-211 
212-215 
216-219 
220-221 
222-223 
224-225 
| 226-227 
| 228-229 
230-231 

| 232 


233 


234 


Hex 


80-83 | HCFCBWRT 
84-87 | HCFCBHDR 
88-89 | HCBOWNER 
8A | HCFDEVTP 
8B | 
8C-8D | HCFBLKLN 
8E-95 | CWRPDADR 
96-9B | CWARNSKA 
Pie: aa 
9C-A3 {| IPLDADR 
A4-A5 {| HCMSGLNG 
A6-A7_ | HCFNRTR 
A8-A9 | HCFNRBLK 
| HCFBLFBA 
AA-B1 | HCCSW 
B2-C9 | HCSNS 
Constants used by 
cc-CD | PARTRED 
CE-CF | PARTRED1 
DO | OCCFLG 
Di | OCCFLG1 
D2-D3. | MSGACOO 
D4-D7_ | SCREENAD 
D8-DB | AHCFCBRD 
DC-DD | LINEAL1 
DE-DF LINECOA 
EO-Ei | LINEPAI 
E2-E3 LINECOP 
E4-E5 LINECNT 
E6-E7. | LINECNT1 
E8 DISPF 
| BW 
| OCCFPAR 
| 
ES REDISFLG 
SCRSAVE 
SCRREST 
SCRRET 
SCREW 
PARCHG 
DISPCNT 
| BYPSCOM 
| 
EA FLG1 
| NOFRST 
PARTPAR 
| DIRPAR 
| RETURPAR 
COUNTPAR 
NOSEC 
| SCRFW1 
| ERRRET 


| 236-239 
240-243 


EC-EF 
FO-F3 


| 
| Label 


| 


Description 


HCFCB extension 


| R3SAV 


| RDSAV 
1 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
c 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
i 
| 
| 
| 
| 
| 
| 
| 


| 
| 
| 


| 


| 


1 


Address of write HCFCB 
Pointer to HCFCB for write header 
Owner of HC file 
Device type (GETVCE output) 
Reserved 
Physical block length 
Addr. of last ‘print logged' HCF rec. 
Disk address of warning message in 
HCF overlay mode 
Address of IPL-record on HCF 
Length of message 3277 
Tracks/Cylinder 
Number of physical records/track 
Block length of FBA device 
CSW without Ist byte 
HC file sense bytes 
RT-redisplay feature 
Current partition redisplaying 
Partition id unchecked 
Current OCCF options redisplay 
OCCF options specification unchecked 
Residual lines on screen 
Address of screen buffer save area 
Address of HCFCB for redisplay 
Line count 1. screen line — all msg. 
Actual line counter 
Line count 1. screen line — partition 
Actual line counter for selection 
Line count indicated by command 
Line count unchecked command 
Display flag 
X'80' Actual reading is backward 
X'40' OCCF options specified 
X'20' Reserved 
X'10' Reserved 
X'08' Reserved 
X'04' Reserved 
X'02' Reserved 
X'O1' Reserved 
Communication redisplay routines 
X'80' Save current display 
X'40' Restore current display 
X'20' Return to start point 
X'10' Forward redisplaying 
X'08' Partition changed 
X'04' Display content of part. line 
X'02' Bypass command checking 
X'O1' Reserved 
Communication byte command checking 
X'80' No first parameter indicated 
X'40' partition parameter indicated 
X'20' Direction parameter indicated 
X'10' Return parameter indicated 
X'08' Count parameter indicated 
X'04' No second parameter indicated 
X'02' Forward redisplay indicated 
X'O1' Error return indicator 


Temp. save area for SCT-—pointer and screen buffer addr. 
: used by $S$BOCRTC and $$BOCRTD 


Save area for register 3 
Save area for register D 
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CRT Save Area (CRTSAV) (cont...) 


© Copyright IBM Corp. 1985 


T 1 
Bytes | 
Dec Hex Label | Description 
{ 
Constants needed for screen management 
244-247 F4-F7 SEGVALO | Auto. del. default for 327 
248-251 FS8-FB | SEGVAL1 | K-command default $/125 
252 FC ACTCCW | Actual CCW indicator for screen cmd. | 
253 FD MSGIND | Message indicator in HEX 
254-257 FE-101 SEGVAL2 | Work segment value 
258-259 102-103 | | Reserved 
260-263 104-107 CRTPOS1 | Position avail.for data in curr.line 
264 108 CRTPOS2 | 
265 109 CRTPOS3 | 
266-282 10A-11A | DELTAB | Deletion table for ASY OC i 
283 11B | End of deletion table (X'OF) 
284-286 11C-11E | POWERCUU | For PGO commands CUU is stored 
287 11F | Reserved 
288-259 120-127 | CRTCCWS | CCW save area ' 
a End of Constants needed for screen management a 
296-319 128-13F | | Interphase communication flags | 
322-418 142-1A2 AUXTAB | Auxiliary screen description table | 
419-503 1A3-1F7 | IOAREA | Hard copy file 1/0 area | 
504-623 1F8~-26F PRINTSNS | Support for 3284/86/87 printer | 
ash Pasgetentln Sona wate Layout for. 3277 screen: x. os gehnecins Bute, Had ge ay eed 
' 624-748 270-2EC SCRNCTL | Screen control table 
' 749-2619 2ED-A3B]  SCRIMG | Buffer for screen image 
‘2620-2667 ASC-A6B} CRTBUAD | Device buffer line addresses 
'2668-2749 A6C-ABD| TABASE | Device buffer line offsets 
'2750-3078 ABE-CO6; BLKLNE i Line frames 
3079 co7 i | Reserved | 
3080-3143 CO8&-C47; CRIMVCSA | Move routine save area 
Boies eee i “ | ay 2 
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PROGRAM RETRIEVAL 


Fetch Control Flow (Part 1) 


(re te ee ea 
| Requester task 


<m 


| 
| 
nter supervisor] 
| 
| 


| Fetch processing 
Vv | 
Analyze FETCH | 


<—_if<——_—_—| Deactivate directory| | 


request if >|Activate directory | ——---->- 

directory read | |search task if ————>|Dir. Search Task | 
| | |successful else RWAIT| 

no | t_________________—_§_ |Search directories | 

| | Jafter requested | 

| | phase | 

| i | 

| 

| 


successful | |search task | <—————End search 
else CANCEL Ld ee eee | 


or give RC| 


a 
>|Activ. program fetch| 
{task if successful 


fea Gk ys gt te ol 
>|Program Fetch Task | 


| 
toy | jelse RWAIT 
| L_________________] |Determine length of | 
| |phase to fetch and | 
| |TFIX the space | 
| [a |READ-in phase | 
<—__—_—_——_ Deactivate program | | | 
| |fetch task |<——-TFREE the space | 


Ms ee ee Ve 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


Vv 
| 
| 
| 
| 
| 
Vv 

if program fetch 
| 
n 
| 
| 
| 
| 
| 
| 
| 
V 


| 
J 


{Return to SVC | 


| Interface 
BS es 
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Fetch Control Flow (Part 2) 
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: l 


| SVC interface 


FETCH data | | 
section {______________J 
Powe. A | es | 
| FCB | | |FWORK | FWORK is 
|__| eeeveccccccccccoce | sesccscvccscssccees |__| part of 
|State | | |State | TCB 
| of | > tt | of | or FETCH 
| fetch | | | | request| requestor 
|tasks | | Fetch overall logic] | | 
ee 
U—___,_______.___ 
| | pox 2 te 
| DFICBR| |DFICBP | 
[+ eeerececcoe| | ee eccccceoes |__| 
[State | | | |State | 
| of | ceo a Wee [of | 
|Dir | °¢ | Directory] | Program | | Pem | 
|Task | * | Search | | Fetch ‘| | task | 
Lt e¢ | Task | | Task | L______J 
e L___s_ L_—_______ 
| er ea | bd | | as | 
| CHAIN eee | eorcccccccccvcceccccccccoe | FREI, | 
-——-| | | a. 
|Table | | | eeeeeccovcece | ERP, | 
| for | | | re 
| search| po tt > | 
| seq | | | | 
L—_ | I/O layer | L____ 
| | 
Se eee | 
° ° e 
° ° 
is. . 8 | eee | TSS ES: | 
| DEVTAB | | EXTTAB | | SDL | 
4 
| et | | | 
| | | | | | 
Co} ee | es 
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Fetch Concept in New Librarian 


The new librarian supports a uniform and condense-free library concept. A New 
Library (NLIB) consists of a non-empty set of sublibraries each may contain 
members of various types like PHASE, MODULE, PROCEDURE etc. A sublibrary 
consists of a directory, alphamerically ordered after 'TYPE.MEMBERNAME', and a 
member space. It may have more than one extent on more than one volume of the 
same disk device type. For faster search algorithm, the directory can be 
accessed via an index set (B-tree). 


The physical organization of the library is done into so called Library Blocks 
(LBs) of the size of 1K. Tne LBs are comparable to the CIs (Control Intervals) 
in VSAM. A LB contains the data record and VSAM like control information. This 
is called LBCF and consists of CIDF (Control Interval Definition Field), RDF 
(Record Definition Field), phase ID and LB chaining field. The next logical LB 
entity is addressed by the LB chaining field. In such a way the requirement of 
condense-freeness is satisfied. 


As a consequence however, the contiguity of the directory and the space of an 
individual member cannot be guaranteed. In a frequently updated library 
respectively sublibrary the degree of fragmentation (directory-, index- and 
member-space) is increased during its lifetime. The resulting FETCH performance 
will be essentially decreased. A reorganization of the library is recommended 
for a proper FETCH performance. 


Library Format 


LB (Library Biock) 


< LB Size >I 
TTTITTTLLL TAT ATTA ELT LITTTTITTTT 
<———— Data >] < Free Space -—>|<~ LBCF -—>| 


LBCF (Library Block Control Field) 


< Size = FGfrecords) >| 
i t T I 1 I oe T f T T } 
L'RCn|.../L'RC1} ID 'FLAG|#REC |L'REC!]A'FSP|L'FSP!#CLB|BPRBA|FPRBA| 
I ! I ‘ ! i t i ‘ | I i 
< >1< fixed length >| 


t 


-— only for compressed or variable length records 
applied only for directory and index LBs (not in TEXT and RLD LBs) 


xPRBA 
| <~2>|<—4-—> 


See 
| OFFS! RBLKNR 


_———— 


|<—>|< 
i | 
| L block number relative to LIB-start 
L____. offset in library block 


> 


F(#records): function of number of records contained in the LB 

L'RCn: length of record number n (at least one record differs in length 
from the others) 

ID: phase ID 

#REC: number of records 

L'REC: length of records (if all records of same length) 

A'FSP: begin address of free space 

L'FSP: length of free space 

#CLB: number of contiguous LBs following this LB 

BPRBA: backward pointer RBA (relative byte and block address) 

FPRBA: forward pointer RBA of next logical L3 

xPRBA: FPRBA or BPRBA 
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fo Library Structure 
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oH o - p— Sublibrary 
eece>, eeee>| Descriptors 
: t 1 if 
MN eociattgntend ver Yer Wake. Soanald aL Ae wis > 
I 
i 
| 
. 
> = Control 
| : Information 
% See inside 


' 
7 ana 
1 1 + 
csepresents the logical ch 
Notes 
= tion tables 
ary. They may 
tien etc. 
. re on the sa 
+ at ~ 
ed after TY 
of one or m 
3. The data length ef TAT, or RLD 


ur 
my 
=) 
a. 
oO 
a 
rh) 


logicai chain (e.g. 
X'FFFFFFFFFFFFF'. 
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member, directory ) is 


FREE-SPACE-MAP Library 


trol 
Inf 
fe) 


utside 


pointers 


chain 
dining of data entities 


are not necessarily located as physical 
+ * . 1 : “ : 1"! 
be built during “Library Allocation” t 


index level and are 


PE.MEMBERNAME'. The highest index leve 
tore LBs {performance considerations). 


LBs is L'LB - L' 


given 
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Sublibrary Structure 


LB 
pos Sublibrary 
| Descriptor 
L_+—_ | 
| | 
| | LB 
<...V Vive. > 
| | | 
| es 
| | | 
| | 
| LB Vv Vv 
| (-— = — a4 i... a 
| | | | | Index Level 
| L__.__} L___——_4 (B—-Tree) 
| i | | 
| Ee i 
| Vv Vv 
{ rs | Poe] a | 
| | eooe>[ | F| 
| | | 
{| | | 
|<..V Vics 
Vv Vv 
eoee>| ee evee>| F{ Directory 
—— ao | L___——t Level 
| 
| 
| 
| KCSHSSHSSSHSHSSSSHSHSHSHSHHSHHOSHSSHSESHOHROSHHESEHESCEOE 
Vv Vv ° 
| Ie ne 1 [ro] ae a | 
| eooe | ecce | F| | e| Member 
eee ee ed [ ees bee ee) Space 
° A 


Yeeeeoseecvsovvsvsssesoveeeseee> 


‘e' represents the logical LB chain pointers. 
" represents the logical chaining of data entities. 
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Directory and Index 


od it] ...[N [x ].. | 
Li—__—_t—__t _1_j 
| | 
ae ange orale eesenoe V sV«.. > 
| | Index Level 
Vv Vv 
a ae he ct oS Oh tod 
|T]... |N [eeee>|T]... |X Jeee... 
Lt_______1_.15 


ad Te | Me 


| SHSSSOHOSHCOCHESOOHOSOEESE 


Vv ° Vv 
Te aac a (aaa Ss OY a T— Tt _1_ «~ODirectory 
IT]... [Keel ///tel Ith... it|.. INt#I///|*| Level 
as Hes nN SET oR 1: ae Ltt 1 tej with splitted 
A ° DIR-LBs 
SSCOSSSEHSOSSESSSSSEOSSESCSSSHOOSESEE 
, \ 
} 
od ‘e' represents the logical LB chain pointers. 
' represents the logical chaining of data entities. 
Note: 
T TYPE entry 
N: Index entry 
X: Index entry 
KH: Directory entry 
N++: Directory entry 
Library Member 
| ff.  e  e Directory 
| | M-NAME |RBA(TXT)|...|RBA(RLD)|...| | entry 
} 
| 
snk hehe add v | | 
| 
Vv Vv Vv 
rT a Se ——1——_- Member of 
| mn TXT LBs eeee>|TXT|.|RLDe***>|RLD| | type = PHASE 
Je 3 [oe ia eee | Eee Reeeoneeeees| 


‘e' represents the logical LB chain pointers. 
' represents the logical chaining of data entities. 
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How to Locate SDL Entries 


SYSCOM 


F4 F7 


T T 1 
| IJBSVA | eee 


SDL 


V 


SDL format of 


Start of SVA | | | eee 


4 4B 4C 


jTotal length|SDL entryl 
of SDL 


eeene T eoeeo 


SDL entry2| eee 
| 


eeoe eee 


a directory entry 


© Copyright !BM Corp. 1985 


t 1 
| DEC] HEX] Label | Description | 
I } ; 

1 1 
| 0 0 | SDLESEG1 | Directory Entry (DE) — common segment 

0; O | SDLENAM Member name 
| 8 8 Reserved | 
i 9 | 9 | SDLEDEF1 | Attributes for DE (flag byte) | 
| SDLEETYP X'80' Type of entry = type 
| | SDLEEHLX 40 Type of entry = high level index 
| i; SDLEEDIR 20 Type of entry = directory i 
10 ~ O01 Reserved 
10 A SDLEPRBA PRBé of member 
16 10 SDLECONT | Number of contiguous LBs 
18 12 Reserved 
20 14 SDLEPFL {| User areal (type = PHASE) 
20 14 SDLEFLG Flags 
SDLEBSR X'80' Self relocating phase | 
SDLEBRL 40 Relocating phase 
| SDLEBSE 20 SVA eligible 
| | SDLEBSV 10 Phase in SVA 
H SDLEBPC 08 PCIL flag for incore directory 
| | SDLEBNF 04 Not found flag (incore directory) 
| | SDLEBAC 02 Entry active (incore directory) 
01 Reserved 
21 15 | SDLESWT Switches 
SDLECLM X'80' Sec SDL: move mode phase 
| SDLECLS 40 Set SDL: SVA eligible 
| 20 — 01 Reserved 
22 16 Reserved 
24 18 SDLEPLN Length of phase(TXT) in bytes 
28 | 1¢ | SDLELPT Load point at link-edit time 
32 | 20 SDLEENP Entry point at link-edit time 
36 | 24 SDLESTR Partition start at link-edit time 
| 40 | 28 | SDLERLD Number of RLD items 
| 42 | 2A | SDLERLDA | PRBA of first RLD item if any, otherwise x'FF' 
48 | 30 Reserved 
56 | 38 SDLESVAP | Entry point in SVA if any, otherwise X'00' 
| 60 | 3¢ SDLEIDEN | Library block id 
64 | 40 SDLEALIB | Address of LIB~DEF-TAB 
68 | 44 SDLEASLB | Address of SUBLIB-DEF-TAB 
eee) 4 
72 | 48 Total length 
t 
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Layout of the Old LIBRARIAN User DE-Format 
; H 7 T 
! DEC} HEX! Label | Description 
4 ‘5 
! QO! Q | DIRNAME | Member name 
! gi: gt | tk internally used *** 
' 41) B { DIRN | Number of halfword containing 
! ! ; | user data | 
{12 ' C ! DIRIT | Number of TXT blocks (1024 bytes) | 
i 14. E ! DIRNN | TXT bytes in last TXT block 
i 16; 10 | DIRC | Flags 
| ' SELFREL | X'80' selfrelocatable 
! RELPHASE ; X'40' relocatable | 
; ’ §VAELIG | X'20' SVA eligible 
: ' SVAPHASE : X'16' phase is SVA-loaded i 
! '  PCIL | X'08' not-SYSLIB flag for in-core—DE 
! | NOTFND | X'04' not found flag 
' i; ACTIVE | X'02' active DE (but possibly not found), 
: : { x'Oi' reserved 
«ale ct ian | Reserved 
18 12, : DIRPPP { Load point at LINKEDT time 
21 $45 | DIREEE | Entry point at LINKEDT time 
24 1 18 } | wr not supported 
7 1B : DIRAAA | Partition begin at LINKEDT time | 
20 ' JE! DIRVEE 1 SVA entry point (if SVA-loaded) 
eH eee A | not suprorted *** | 
‘ ; 
i 
38 ' 26 | Total Length 
Layout of the New LIBRARIAN User DE-Format 
DEC’ HEX! Label ‘ Description 
: 
8) 9 ' DIRNAME | Member name 
8 8: i X'PFPFEF! 
' 41° B ' DIRN ! Number of halfword containing 
| User data (N'OR') 
' 12 ° DIRLMBR | Length of phuse in bytes 
16 19 © DIRC | Flags 
" SELFREE | NX'SG' solfrelocatable 
RELPHASE | X'40' relocatable 
SVAELIG | X'20' SVA eligible 
: ‘  SYAPHASE X'10' phase is SVA-loaded ! 
: *  PCIL : X'98' not-SYSLIB flag for in-core DE ; 
; ‘ '  NOTFND | X'04' not found flag i 
© ACTIVE | X'02' active DE (but possibly not found) ! 
: | X'O1' reserved i 
ha7- di: | reserved i 
; 20.14! DIRCOPY | PTR TO DE-COPY 
24 18 ' DIRPPP | Load point at LINKEDT time 
2 1C DIREEE Entry point at LINKEDT time ; 
3° 29 DERAASA Partition begin at LINKEDT time 
36, 24 DIRVEE ' SVA entry point (if SVA-loaded) 
seieerie 2 xt 7 ' i 


Total Length | 
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Relationship Between Library Control Blocks 


The relationships between the control blocks in the Supervisor are the same as 
for the NEW LIBRARIAN. A so called system searching chain is established during 
the FETCH initialization and will be maintained by the LIBRARIAN services. 


SYSCOM LIB—DEF—TAB 
Sr — ee A. 3 
| | SYSTEM-CHAIN | | | 
| @FTTAB | Bpoattk we a cee >TO | | 
| | |OCLIB) | O(SLB) | | |EXTTAB |....> 
| @LPB |.... po | Lo | 
| bd | | 
| i | | | 
See LPB | | 
eae > | EXTTAB | 
| @LDEF |......... > a_i KV 
| @LDEF | | | 
| | nee | @DEVTAB | 
| | | @EXTTAB |....> 
St eae | @SLDEF | | L.___._-} | 
| | | 
| | | 
| | EXTTAB | 
| SYSLIB—TAB i KY 
Vi cide >-——_ | | | 
7 | ee > V....>] @DEVTAB | 
t__§__—_ | | | @EXTTAB | 
| | | eee eee | 
| | 
SDL | | DEVTAB 
p—————<...V OV. ep 
| | | | 


Notes: 
1. The SLD of the SYSLIB is built by the librarian at end of IPL time. 


2. The meanings of the various control blocks are given below. 


Relationship Between Directory and Phase-Member. 
Directory entry 
(Fos hl a cee eee 
| Name|RBA-TXT| //|RBA(RLD) | OF(RLD) | 


| | —__ 


! 

ee | 

| | 

Library V Library member Vv Vv 
a ee aan A Va he 
|  eeeee | TXT-LB | | TXT eee | TXT | RLD | 
| See A Mee, a ) 

| <_________—__— _ RBA] ——_~______-—__> | <-OF FSET-> | 


| Library start RBA = 0 
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| Field | Length | Contents 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


VLT 


VDSA 


VLSA 


VLNA 


VLEA 


VL 


GV 


8 


4 


£- 


any 


Date plus time SVA has been 
updated 

Start Address of the System 
Directory List 

Start Address of the virtual 
library (Note 1) 
Address of next available 
location in SVA 

Address of end of SVA 

Pointer to next free SDL entry 
Number of SDL entries 
STOWTABLE (Communication area 
between Job Control and 
SMAINDIR/$MAINDIF) 

Number of bytes in SDL 

System Directory List (Note 2) 
Alignment bytes for doubleword 
boundary 

Virtual library containing 
reenterable and relocatable 
phases 

GETVIS area for the system 
(starts on page boundary) 


Address of first doubleword aligned byte after SDL. 


The layout of this area is compatible with a directory entry in the library. 
The SDL has fixed legth entries of 72 bytes. The last contains 8X'FF' as 


phasename. 
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JOB ACCOUNTING TABLES (ACCTCOMN, ACCTABLE) 


Job Accounting Common Table (ACCTCOMN) 


fre Sa T T 7 
Bytes | | 

Dec Hex Label Description 
! + ! = 
| 0-3 0-3 | ACCTPCNT | Count of active partitions 
| 4 4 ACCTSWCH | Job control switches 

ACCTCTSW | X'20' Catal switch 

5-7 5-7 Reserved 

8-11 8-B ACCTABLN | Length of JA partition table 

12-15 C-F | ACCTUSEP Address of JA user save area 

i6-19 10-13 ACCTUSEL Length of JA user save area 

! | 


Bytes 124-127 (X'7C - 7F') of the System Communication Region (SYSCOM) contain 
the address of the Job Accounting interface common table. 
Label ACCTCOMN identifies the first byte of the table. 
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Table (ACCTABLE) 


| Bytes | | | 
i Dec Hex i Label | Description 
! = . 
: 0 0 ACCTSWTC Accounting partition switches 
: . ACCTACTV {| X'80' Indicate JCL-N/SJOBACCT active 
i 1-7 1-7 i | Reserved 
8-11 8-B . ACCTSVPT | Address of job card field following ; 
i job name 
» 12-13 C-D + ACCTNSIO j Current number of SIO count fields | 
i 14-15 E-F | ACCTLEN | Length of SIO area = 6ntl, where n is! 
| | the number of devices accessed by 
i the job step 
e - b6=23 10-17 ACCTCLCK | Time field in seconds i 
1 24-27 18-1B ACCTLADD + Address of label area 
|} 26-31 1C-1F ; ACCTCPUT : Partition CPU time counter for 
i current step 
32235. 20-23 ACCTOVHD |< Overhead time counter for current 
' job step (distributed in 
: proportion to CPU time) 
36-59 24-27 ACCTBNDT j System wait time for current job step! 
i (distributed in equal parts 
| to activate partition) (Note) : 
40-47 28-2F ACCTSVJN | Save area for job name during i 
: ' simulated EOJ 
DE ARS ee Ooh ke Oo Foliowing information passed to the user ..............5 
© 48-55 30-37 § ACCTJBNM | Job name from job card 
56-71 38-47. ; ACCTUSRS | User information from job card 
12°73 48-49 ACCTPTID Partition ID 
74 4A ACCTCNCH, Cancel code for job step | 
75 4B ACCTYPER | Type of record: ‘L'’=last job step, 
; : elise 'S' 
» 70 83 40-53  : ACCTDATR + Date of end of job step in the 
. format MM/DD/YY 
; 1 ’ or DD/MM/YY, depending on the | 
; | DATE standard option 
»  $4-87 54-57 +» ACCTSTRT : Stop time of previous job step, ; 
' i in packed decimal ; 
i 88-91 57-5B ACCTSTOP | Stop time of job step, 
| in packed decimal 
92 95 5C-3F ACCTDUR | Step duration time in seconds, 
; in binary 
96-103 60-67 ACCTEXEC . Phase name taken for EXEC statement 
, C4107 58-68 ACCTHICR , length of page * number of partition | 
' pages referenced (or PFiXed for real 
! , , execution) in the current job step. 
i | For MODE=VM, this field contains the 
; highest virtual storage address ; 
| allocated to this partition i 
108-111 6C—6F ACCTIMES | Same as ACCTCPLT at the end of the 
! ! job step 1 
» 112-115 70-73 Same as ACCTOVHD at the end of the ; 
i job step 
i 116-119 74-77 _ Same as ACCTBNDT at the end of the 
1 job step 
126 78 ACCTSIOS | Six bytes for each device accessed 
, by the job step, as follows: : 
; i 2 bytes for device addr.(Ocuu) 4 byte: 
i : for SIO count in current job step i 
last byte : Overflow byte: always X'20', 
indicating no overflowi 
Note: 
Bytes 116-119 (X'74 - 77') of the Partition Communication Region (COMREG) 


contain the address of the ACCTABLE. 
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PAGE MANAGEMENT 


Segment Table Entry (370 Only} 


— 
|PTL| page table addr|0|c]I| 
ee 
0) 4 29 30 31 


PTL : (16/max * len) - 1 
len = actual length of page table 
max = maximum size of page table 
page table address: 
address of page table segment allocated to entry 
Cc : common segment bit 
I : invalid segment bit ( 


¢ 


0 - the segment is valid) 
1 - the segment is invalid) 


Page and Page Table Entries (370 Only) 


Se a 
| Bit | Label | Description | 
| 0-15 | PTE | Page addressable | 
| 0-11 | PFRA | Page frame number | 
| 12 | IBIT | Invalid bit = 0 | 
}13-15 | | Architected = 0 | 


Page Table Entry (PTE) for Addressable Page 


a ee ee oe a 
| Bit | Label | Description | 


0-15 PTE Page not addressable 
O-— 4 | STKEY Storage key of page 
5- 9 reserved 

10 HABIT Invalid state: 


| | | | 
| | | | 
| | | | 
| | | 
| | | HABIT = IBIT = 1 | 
| 11 | COBIT | Connected state : | 
| | |  COBIT = IBIT = 1 | 
{ | | Invalid bit =1 | 
| | | Architected = 0 | 
| | | Valid copy on PDS | 
| | | no copy on PDS | 


12 
13-14 
15 


IBIT 


PDSBIT 


=1 
=0 
Page Table Entry (PTE) for not Addressable Page 


Page Frame Table Entry (PFTE) 


0 1 3 4 5 6 8 12 15 
[5 een a ae ee Sale eee ait es era ow ne a, Wine Pp. I os el eee oe hae 
|PFTE | Page 370 |Waiting | PFIX | TFIX |Forward | Backward] 


| 
|Flag | Number | Mode |Task ID | Counter | Counter |Pointer | Pointer | 
| 


| 
| 
| | (PNR) Flag | (WID) | | | | 

ie prea Se RA nema eee 


a a | 
| Byte(s) | Bit | Description | 
| o-2 | | Page frame number (0,-1, 2, 3, ...) | 
| 3 | 4 | =0 Page frame belongs to supervisor or IPL | 
| | | partition. | 
| | 4 | 1 Page frame belongs to initial page pool | 
| 4-7 | | zero | 
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PFT Entry Byte Description 


i? Ronee - Clone een ee ee NR See ee ee ee 


| Byte | Label | Description | 
0 PFTEFLG ae flag 
HBIT Each task causing a page fault can use the 


the page before it is disconnected again. 


| | 3 | 
| | | X | 
| | | | 
| | POEBIT | 40 The PFTE is enqueued for page-out. | 
| | POBIT | 20 An active entry from the PMR task is | 
| | | enqueued for page-out. 

| | POABIT | 10 I/O for a page-out has been started for | 
| | | this PETE. | 
| PCBIT 08 The page which belongs to the page frame | 
| | | has connected state. Either a page-in or | 
| | | an unconditional page-out request is in | 
| | progress. | 
| | POSYSBIT| 04 A page-out request is in a system queue. | 
| | | 02 -— 01 Reserved | 
| 1- 2 | PNR | If a page belongs to the page frame, | 
| | | these bytes contain the page number | 
| | | (='virtual-page—address'/pagesize). | 
| | | If a block of VIO storage belongs to the frame, | 
| | | these bytes contain the block number. | 
| 3 | S370FLG | 370 mode flag | 
| | NFRP | X'80' Frame is used by a PFIXed page. Since the | 
| | | frame is in the PSQ or IPFQ this page must | 
| | | not be TFIXED if the TFIX counter is zero. | 
| | NFVP | 40 Page belonging to this frame is requested | 
| | | by PFIX. The frame is not in the PSQ. | 
| | | The PFIX request cannot be satisfied | 
| | | immediately. | 
| | DRAP | 20 The address space belonging to the PFTE is | 
| | | failing storage. | 
{ | PFTEBLK | 10 Only block of VI0—-storage connected to frame| 
| | PNRINV | O08 Page frame is unused. The PNR-, FIX- and | 
| | | WID fields are invalid. Also the PFTE- and | 
| | | 370 mode flags (except for NFRP and DRAP | 
| | | bits) are invalid. | 
| | PFTEREAL| 04 Frame is used by real partition. | 
| | | 02 -— 01 Reserved | 
| 4 | PFTEWID | Waiting task id (370 mode only): | 
| | | Contains the PIK of the partition requesting PFIX. | 
| | | The page frame of the page to be PFIXed does not | 
| | | belong to the corresponding real partition. | 
| 5 | PFIXC | Indicates how often the page is PFIXed. | 
| 6-7 | TFIXC | Indicates how often the page is TFIXed. 

| 8-11 | PFTEFPTR| Pointer to the next PFTE. | 
| 12-15 | PFTEBPTR| Pointer to the preceding PFTE. | 


ee ee | 


Note: 


The pointers in bytes 8 through 15 are only valid if the PFTE is in the PSQ, or 


for 370 mode, in the IPFQ. 


Page Table Assignment String (PTAS) 


a aR emer Rae | 
| Bytes | Label | Description | 


0 1 | PTASE Entry length 2 bytes 


0) 


PTASESPN Space number where 


the PTAB is 
assigned to 


| | 
| | 
| the PTAB belongs to | 
| | 
| | 
| | 


| | 
| | 
| | 
| 1 PTASESGN | Segment number where 
| | 
| 
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Page Data Set Table (DPDTAB) 


Bytes 224-227 (X'EO'-X'E3') of the System Communication Region (SYSCOM) contain 


the address of the DPDTAB. 


The DPDTAB consists of a header and i5 extent definitions. 
Label DPDTAB identifies the first byte of the table. 


1 
Dec Hex Label Description 
t | 
0-15 O- F | DPDADR Header 
fo 1 o- 1 DPDEXT# Number of possible extents 
2- 3 2—- 3 DPDAEXT# Number of actual extents 
4- 7 4-7 DPDPAG# Number of supported pages 
8-11 8-— B DPDLLCON Address of load leveling constants 
| 12-13 c— D Reserved ; 
114-15 | E- F | DPDLEN Length of header | 
i } 


Page Data Set Table Header 


1 
Dec | Hex Label Description 
——— ~ 
0-31 0-19 DPDENTR Extent definition 
o- 1 O- 1 | DPDUNT [CUU of PDS device 
2 2 DPDDEVT Device type:FBA, CKD, RPS 
3 3 DPDDEVC |Device code (DTF) 
| 4-5 | 4-5 | DPDREC# |CKD: # records/track 
4-5 4- 5 DPDBLKLG iFBA: block length 
6- 7 6- 7 DPDTRCK# (CKD: # tracks/cylinder 
6- 7 | 6- 7 | DPDBLKPG |FBA: # blocks/page 
8-11 8— B | DPDRTLL iCKD: track# of lower extent limit 
8-11 8- B DPDBLKLL iFBA: block# of lower extent limit 
12-15 C— F DPDTRCKU CKD: # of used tracks 
12-15 C— F DPDBLKU |FBA: # of used blocks 
16-17 |10-11 | DPDPUB |PUB index 
18-23 |12-17 DPDVOLID iVolume id of PDS 
24-27 |18-1B DPDPGUL |Page # of upper limit 
28-31 |1C-1F | DPDDEVCB |Addr. of DEVCB for extent 
a I a 


Page Data Set Extent Definition 
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—w' Device Control Block (DEVCB) 


Every PDS device is described by its associated Device Control Block (DEVCB). 


1 
Bytes | | 
Dec Hex |; Label | Description 
| ' : 4 
0 o| DEVCB |Device control block 
0= 3 0~- 3} DEVCBNXT |Addr. of next DEVCB if any, addr. of 
re Eo [first DEVCB in chain for last DEVCB 
egg 4 4| DEVSTAT [Status byte 
| | DEVSTRT X'80' I/O request started 
DEVEMPTY | xX'40' no I/0 request enqueued 
DEVPGWO X'20' request waits for 
| unconditional page out 
5 5| DEVCBTYP [Device type: FBA,CKD,RPS 
6- 7 6- 7} DEVEXT# Number of extents on device 
8- 11 8-— B; DEVACT Address of PGQE 
~ | 12-15 CH F| DEVDPD Addr. of 1st DPD entry for device 
\ 16- 19 10- 13! DEVRELO {Relocation for Ist DPD entry on device 
—s 20- 23 14- 17; DEVAPTAS |Addr. of Ist PTASE for device 
: 24- 25 18- 19} DEVPTASA [Highest offset of PTASE already occup. | 
26- 27 1A-— 1B| DEVPTASB |Number of contiguously located PTASEs 
jand still available on device 
; 28- 31 1€- 1F; DEVPCB |Address of related PCB 
32~- 35 20- 23| APFPSS |}Address of PFPSS for dev. 
| 36- 36 24- 27 |Reserved 
40- 55 28- 37| DEVCCB |CCB for device 
| 56-103 38- 67| DEVCCW |CCW program area 
1104-107 68— 6B| PFRQBEG |Begin addr. of system page fault queue 
108-111 6C-— 6F| PFRQEND |End addr. of system page fault queue 
112- 70- |Partition queue headers in the 
|sequence BG, Fn, ... , Fl 
| | length = NPART#2*4 
| i 
| NPART = 12 
208-211 DO- D3] PORQBEG |Begin address of page-out queue 
212-215 D4&—- D7} PORQEND |End address of page-out queue 
! I 


Page 1/O Request Elemant €(PGQE) 


The PGQE is part of Task Information Block (TIB). The following fields are 
relevant for page management. 


T 
Hex Label 


é 
| | 
t f 
| 
| 
| 
| 
| 


Description 


at auras | 


TIBADR 
O- 3 | O- 3 TIBCHAIN 
4-7 | 4-7 TIBSTATE 


Task information block 


foo) 
oO 


Bound state information 
page-in: page fault addr 
page-out: pageframe addr | 


| g-11 | 8- B | TIBPFAPP |Addr. of PHO appendage 
8-11 8- B TIBVIOTB |Addr. of VIOTAB entry 
12-15 | C- F | PGQE |Page I/O request element 
: | 12 | Cc | PGQTYP |Request type 
ad PGSEL X'80'|Page selection required 
PGNCNT X'40'|Page-in, counting done 
PGO X'10'|Page-out request 


PGOWAIT X'18'|Page-out req. with waiting task 
PGOPGIN X'14'!Page-out req. with waiting page-in 
PGOVIO X'12'!Page-out req. from VIO 

113-15 | D- F | PGINF {Information for page I/O handling 
bh  & : |.... further TIB 

| 

ii 
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Page-in Table (PAGETAB) 


| | PAGE | | ECB | 
| TID | Address | FLaG | Address 

| | | | | | | | | 
SS SS eS ee eee 
{0 iB 314 \5 7| 
} aE fe ee Oe 

° e 
e e 
e e 


oS ie ee = 
| Bytes | Description | 
— 
| 0 | Identifier of task that issued the PAGEIN macro | 
| 1-3 | Pointer to the areas to be paged~in. | 
| 4 | Flag Byte: | 
| | x'80' PAGEIN request completed, second scan needed. 
| | 40 Reserved. | 
| | 20 At least one page is outside partition boundary. | 
| | 10 At least one entry with a negative length was found| 
| | 08 Reserved. | 
| | 04 Paging activity too high, termination was | 
| | requested by LOAD LEVELER. | 
| | 02 Task is terminating, entry has to be deleted. 
| | 01 Second scan in progress. 
| 5-7 | Pointer to ECB (if used) or zero. | 


If the address of a 
returned in byte 2 


n ECB was specified in the PAGEIN macro, information is 
of that ECB as shown below: 


fy a ee ee ee re ee peed 


| Bits | M 
| | 

| 0 | PAGE 
| al | Page 
| 2 | One 

| | outs 
| | requ 
| 3 | At 1 
| | dete 
| | spec 
| 4 | List 
| {| isn 
| | requ 
| 5 | Pagi 
| | term 
16+7 | Rese 


Note: 
Bit 0 is set by the 
pertinent PAGEIN re 


inated by LOAD LEVELER. 
rved. 


| Set by: | 

eaning | svc | PGN | 
|Routine| Task | 

$+ 

IN request completed (see Note) | Y, | Y | 
—in table (PAGETAB) is full. ft y { N | 
or more of the requested pages are | N | Y | 
ide the address range of the | | | 
esting program's partition. | | | 
east one negative length has been | N | Y | 
cted in the processed area | | | 
ifications. | | | 
of areas that are to be paged-in {| Y | N | 
ot completely contained in the | | | 
esting program's partition. | | | 
ng activity too high. PAGEIN request| N | Y | 
| | | 

| | | 


PGN system task if that task receives control to process the 
quest, otherwise the bit is set by the SVC routine. 
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Routine Identifiers (RID) as Used by the Page Fault Handler (PFFLIH) 


i Tree eee pee = ee TN Pe eee gee a = ee eee 
| NAME | ID |MEANING | ACTION | 
sacle olen + 4 
|SYSTEMID| 00 |System error condition, | Hard wait. | 
| | |for example, page fault in | | 
| | |the I/O interrupt handler | | 
pp gt 
|REENTRID| 04 [Page fault or GETREAL |Save PSW and registers in | 
| | [request in a Juser task's system save _ | 
| | |reenterable routine. 
JUSERID | 08 |Page fault from a user |Hard wait X'FFB' if this | 
| | |task or from a system Jis a system task and the | 
| | task. |TCB shows that the task | 
| | | |does not expect page | 
| | | |faults; else registers | 
| | Jand interrupt status are | 
| | | |saved in the users save | 
| | | Jarea. If the task | 
| | | |operated in disabled mode, | 
| | | |the task is canceled with | 
| | | |cancel code X'15'; | 
| | | jotherwise the page request] 
| | | jis enqueued. | 
——o 1 — 
|APPENDID| OC |Page fault in I/O |Task is canceled with | 
| | | appendage routine |cancel code X'36'. | 
|RESVCID | 10 |Page fault |Set RETRYSVC bit in TIB | 
| | | in SVC 7 (X'07') |save interrupt status and | 
| | in svc 13 (X'oD') |regs. in user save area; | 
| | | Jenqueue page request. | 
' —4 
|DISPID | 14 |Page fault in a routine |Enqueue page request. | 
| | |which does not require any | 
| | |inform. to be saved, e.g. | 
| | |page fault in the disp. | | 
++ 1 
|PFARID | 18 |Page fault in a page fault [Save interrupt status and | 
| | appendage routine. |registers in an internal | 
| | |save area and cancel user | 
| | | |task w. cancel code X'OE' | 
+— 4 
|ETSSID | 1¢C |Page fault in subsystem |Save interrupt status and | 
| SUBSYSID| | |registers in an internal | 
| | | |save area. | 
ae — 
|MICRID | 20 |Page fault in MICR or |Save interrupt status and | 
| [subsystem appendage. |registers in an internal | 
| | |save area and cancel user | 
| | [task w. cancel code X'OE' | 
—o a a, 
40 |Page fault in a gated {Close gate to routine 
Supervisor service. | (routine cannot be used 


| | 
| | 
| juntil gate is opened). | 
| |Save PSW and registers in | 
| |the user task's system | 
| |save area; set TIBFLAG to | 
| |return to SVRETURN. | 
| |Enqueue page request. | 
| | (Any task accessing a 

| |gated resource is put in 

| |a wait state and is marked 
| |resource bound. It is re- 
| | leased from the wait state 
| |when the resource is 

| jungated after the page 

| |request has been completed 


' 
a ee ee Se | 
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fF en» T 1 
| Label | Length | Description | 
eae 
| ISTACVT | 4 | Address of VTAM CVT | 
| IsTas49 | 4 | Address of SVC 49 Code | 
| ISTAS53S | 4 | Address of SVC 53 Code | 
| ISTCFCSA | 4 | Address of Command Handler | 
| ISTAPSEX | 4 | Address of APS Exit | 
| ISTAPSTA | 4 | Address of APS Table 
| ISTARID | 4 | Address of RID | 
| ISTVITP | 4 | Address of Code to check for | 
| ISTRETR6 | 4 | Base Register for VSE Dispatcher | 
| ISTRETR7 | 4 | Return Register for Dispatcher | 
| ISTTTXSZ | 4 | | 
| ISTVITIK | 4 | VTAMRP Task ID | 
| ISTPHNM | 5 | Phase Name of Transient : | 
| ISTX1 | 1 | TOLTEP saves SIO Condition Code | 
tl 4 \ 
Note: 


Bytes 96-99 (X'60-63') of the System Communication Region (SYSCOM) contain the 
address of the VTAM Address Vector Table. 


Entry in the Asynchronous Process Scheduler (APS) Table 


| Label 
APSFLAG 
APSCNT 
VTAMFLAG 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
l 


| Length | Description 


X'20' User Exit Delay for LTA 


Pointer to VTAM APT 

Count of VTAM ACBs open 
X'80' TPBAL issued (AR only) 
X'40' DUMP already taken 
X'20' VTAM delayed Cancel 


X'10' AP delayed for temination 
X'08' VTAM User Exit in control 


X'04' VTAM SVC active 
X'02' VTAM Appendage active 


X'01' Key 0 / Substate required 


Reserved 
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(/370 u-program) 


EC PSW 
an 1 
| Instruction Address | 
b T 7 | 
| 9 B|6 | 0 8 oO| 
|}-——_}—+-_—___ 
[40 47| 48 |52 63| 
a | aor ——S 
+4 aif | | 
— {$$} ___-—_______—__._ 
| Segment no. | Page no.} Byte displacement | 
! | 
1001 = 1011 0011 | 9000 1000 0000 | 
I i - : T 
SSS | 
| | Vv 
ji ee 
a ' 40 0110 11 | 00 | {| 00 11 oo: ¢t 
\ } a, | 
aed I 2s 6 C | 0 CP 4 Page Table 
| J a | 
| (16-Page-entries for 
Control reg.1 | one (1) 64K Segment) 
| poo seth |e is) x'cooo' 
| | 0x00 6F40 | | 
| a | ; 
| | 
I< atl > Gathers X'E680'} | 
} |. Page 0 (x'00') | 
i V Segment table Ail. 2 ' | 
7 I. Page 1 (X'O1') 
Segment 0 (X'00) | io } | 
r EF FOOQOCQO0: ieieiks cient = . * 
: ae me | 
i Segment 1 (X'oi') | i Page 06 (X'06') 
—— ht 0461 | 
Segment 2 (x'o2"') | V X'E68C' + 
{ ' >| Page 07 (X'07') }-—- | 
{ 7 oA, 1 0321 
1 | Ry eee L 
| | Segment 153 (x'99') | hey Page 08 (X'08') H 
| | I. 1 O571 | 
| | Segment 154 (X'9A') | a : 4 
| | a. ; , 
>| Segment 155 (xX'9B') [ —+ b | 
. | FOOOE680) ..... eee eee ee eee Page 14 (X'OE') | 
o i | Page 15 (X'OF') | 
od | 
* X'71AC' (X'6F40' + X'26C') | 
j T , Page Table Entry 
; 0000 6011 0010 | 0001 |< | 
Le Se De ge ee = Se, CT CS 


x in Control Register 1 
= virtual size indication. 
Virtual size = (xt+l) MB. 


Segment Table Entry = 
4 bytes length. 


Page Table Entry = 2 
length. 


bytes 


0 A 11 12 
Vv Vv 
. SS ° 
i : / 0000 0011 0010 | 0000 1000 0000 | 
ager | 
0 11 12 23 ° 
i Real Address 
4 1 
1 COG 39 OSG 4 ° 
Note: Values used in the figure are hypothetical 
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OLTEP 


Functions: 


2 


Diagnosing I/0 errors 


9 Copyright 


° Verifying I/O device repairs and engeneering changes 
° Checking I/0 devices 

* Verify the integrity of customer data 

System Generation requirements: none 


Requirements for Execution of OLTEP: 
OLTs and CDSs available in Sublibrary IJSYSRS.SYSLIB 


© 


Devices to be tested are in 'Ready' status 


Any real partition having at least 18K of storage 
If OLTEP runs in a VSE/POWER controlled partition or has to test 
devices being spooled by VSE/POWER, please consult the DOS/VSE-OLTEP 


SRL (GC33-6156) for special recommendations 


JCL to invoke OLTEP 


}—______— 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
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Statement Comments 


/{ JOB XXXXX 
// ASSGN SYS000,cuu 


Required 


This ASSGN statement is necessary if NST 


loading is to be performed. 


"SAK.SYSM' 
// EXTENT BGBPDTF 


loading is to be performed. 
This EXTENT statement is necessary if NST 


loading is to be performed. 


// ASSGN SYSnnn,cuv 


One ASSGN statement is necessary for each 


Aa ERE PN ele, REO (SE, 


// UPSI O12 This statement is necessary if a console 
device is available but the test—run defini- | 
tion is to be entered via the input job | 
stream (SYSIPT). 

// UPSI 10 This statement is necessary if READD data 
input is contained on diskette. 

// UPSI 11 | This statement is used when both of the 
above options are being used. 

// UPSI 001 | This statement is needed if OLTs reside on 
NST disk. 

// UPSI 0001 This statement is needed if OLTs reside on | 


EXEC IJZADOLT, 
REAL[ ,SIZE=nK] 


- 
| 
| 

// DLBL BGBPDTF, | This DLBL statement is necessary if NST 
| 
| 
| 
| 
| 
| 
| 
| 


_when NST loading, because a 4K buffer is allo- 


device tested or accessed by a test. None is 
required if the device was permanently | 
assigned. 


NST tape. 

Mandatory, OLTEP will run only in real. SIZE= 
parameter must be a minimum of 18K; this will | 
allow a 4K OLT to execute. If OLTs larger than 
4K are to be run, the SIZE=parameter must spe—| 
cify a size equal to 14K plus the size of the | 
OLT. The size specified must be a multiple of 
2K.If the SIZE=parameter specifies a size of | 
22K or larger, add 4K since the 4K history | 
tape input buffer will be automatically allo-— 
cated during OLTEP initialization. If NST 
loading is to be performed, the minimum core | 
needed is 26K. If 30K is available, a history | 
tape read buffer will automatically be alloca— 
ted. The SIZE-parameter must always be used 


cated in the GETVIS area. 


dev/test/opt | This statement is included if the test—run 
| definitions are entered via the input stream. 
/* Required 
/& | Required 
to 
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Tabie of Options 


f T eal 7 
| Option | Entry | Description 
r 
| Testing TL(n) | Recycle the test. If you specify a value (n), 
| Loop NTL | OLTEP runs the test the number of times indicated| 
| | If you do not specify a value, the test cycles 
| | | 10 times. The maximum value allowed is 32,767 
| | | decimal. (see Note 1) | 
| Error EL(n) | Authorizes any error loop coded in the OLT to be 
Loop EL(1) | executed the specified number of times. If you 
NEL | specify a value (n), the test loops the number of 
| times indicated. If you do no specify a value, 
| the test loops the number of times indicated in 
| the preface of the OLT. If you specify the cha— | 
| racter I, a flag is set which indicates to the | 
| | OLT, that it must loop indefinitely on the error. 
| You can terminate the loop by specifying NEL 
| following a request for communication (Note 1) 
| | 
| Print PR | Print messages from the OLT. If you enter NPR, 
| NPR | all messages originated by the OLT and normally | 
| | designated for SYSLST are suppressed. (Note 2) | 
Error EP Print diagnostic error messages from the OLT. | 
Print NEP The FE option overrides NEP when a first error | 
| is encountered (once per section). (Note 3) | 
~ | 
| Control { CP Print OLT start and termination messages nn | 
Print | NCP SYSLST and SYSLOG. | 
1 
t 
Parallel PP Use the consol device, in addition to SYSLST for 
| Print ; NPP | OLT messages. Four levels of print are available 


| on the parallel printer by entering one of these 
numbers at (n). 

0: HEADER only 

1: HEADER, DESCRIPTION and COMMENTS | 
| 2: HEADER and RESULTS 

| 3: HEADER, DESCRIPTION, COMMENTS and RESULTS 
£ 


First FE Forces a communications interval when the first 
error NFE error is encountered. (Note 3) A message is 
Communi— | printed indicating the test being run and the | 
cations | ! device being tested. This is followed by the 


O1E105D message, that allows you to: 

| | * Change the device and/or test fields. 

i * Continue the test by entering /// or //(Option 
i j | change)/. 

¢ Enter any OLTEP verb. | 
* Cancel OLTEP by entering CANCEL. | 
| There cannot be a first error communication if a 

; console device is not available. 


; Manual MI | Informs the OLT section to run all manual inter-— 
| Interven-| NMI [| vention routines within the test request. (MI | 
' tion ; and RE are mutually exclusive options.) | 


1 1 1 
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Table of Options (cont...) 


T _.... >, ES | 

| Option | Entry | Description | 

— 

| Trace | TR | Trace all functions called by OLT. (Note 4) | 

| | NTR | | 

|}—___} ——_4 — 
EXT= EXT= Information following this option is passed to 


| | 
| the OLT section by way of a 56-byte buffer. This | 
| information must be the last entry in the option | 
| field and can contain any character but a slash. | 
| EXAMPLE: | 
| 181/2400C/TL,EXT=BLOCK 4FFPRINT/ | 
| BLOCK 4FFPRINT goes into a buffer area within | 
| OLTEP and then passes on to the OLT section. 


1. The FE option overrides the TL and EL options, unless NPR 
is also in effect. However if you enter /// or //option 
change/ at a first error communications interval, the TL 
and EL options, if specified, are in effect. 


2. NPR without EL and/or TL is ignored. 


3. EP and FE are ignored if no print and either EL or TL are 
specified. 


4. Routine to routine linkage is not traced. Do not attempt to 
use Trace function when SYSLST is assigned to the test 
device. 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


Storage Layout 


A A 
OLTEP | | 
Resident Area | | 
(nucleus) | | | 
| 6K | 
| | 

Tables, Contstants, | 
etc. | | 
Vv | 
| 
| 
| 


A 
OLTEP | 
Transient Area | | 
| 18K (minimum) 
IJZACOMP , 8K * Partition REAL 
IJZADOO3, 
LOGSCAN 
| 
V 


Input Buffer, etc. 


ie 
| 
| 
| 
| 
| 
| Transient Manager, 
| 
| 
| 
f 
| 
| 
| 
| 
| 
| 
| 


* 12K if LOGSCAN BUFFER 


16K if NST 
OLT Area 
20K if NST and LOGSCAN 


T2400B, 
T2311H, 
T2702A, 
etc. 


< a ee ere Je a ae ln pee ee a il, 


| 
| 
| 
T2400A, | 
| 
| 
| 
| 
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Example of OLTEP Operation 


Note: Example is shown for OLTEP operation in the background partition of a 


multiprogram environment. A console device is available, and console interrupts 


are permitted. The Operator responses are underlined. 


BG assgn sys010,181 8 SoS 


BG assgn sys011,182 


BG exec ijzadolt,real[ ,size=nK 


BG E102I OLTS RUNNING 


OLTEP is loaded into the back- | 
ground partition. Example loads | 
OLTEP into the background parti- | 
tion, OLTEP can also be loaded _ | 
into a foreground partition. | 


BG E134I WARNING — DASD VOLUME LABELED CEPACK NOT PROTECTED FROM WRITE 


BG E1071 OPTIONS ARE NTL,NEL,NPP, ~>———~ 


| 
NFE,NMI,CP,PR,NTR | Initial communications interval | 
J 


BG 01E105D ENTER — DEV/TEST/OPT/ + 


rc 


| labeled tape mounted on the 


BG E119I NON-STANDARD TAPE LABEL 0181 | test device. 


a 
BG 181/T3420a/fe/ | OLTEP finds a nonstandard | 
| 
| 
j 


BG 04E139D REPLY B TO BYPASS,R TO RETRY,P TO PROCEED (MAY DESTROY DATA) 


BG p 


r 
BG E158I S T3420A § UNIT 0181 | Error encountered 
[Wate 


BG E129I FIRST ERROR COMMUNICATION T3420A 001 UNIT 0181 


BG E107I OPTIONS ARE NTL,NEL,NPP,FE,NMI,EP,CP,PR,NIR 


BG 01E105D ENTER — DEV/TEST/OPT/ 


f 
| First error communications 


BG 182//nfe,t1(2)/ | interval. 

BG E158I *T T3420A $ UNIT 0181 

BG E1581 S T3420A $ UNIT 0182 

BG E1i58I T T3420A $ UNIT 0182 

BG E1581 S T3420A $ UNIT 0182 Console interrupt key pressed. | 
aera eens J 


BG E1071 OPTIONS ARE TL,NEL,NPP,NFE,NMI,EP,CP,PR,NIR 


BG 01E105D ENTER — DEV/TEST/OPT/ ;— 


| Interrupt communications 


BG /t3420c,e/ntl/ | interval 
i 


BG E1581 *T T3420A $ UNIT 0182 
BG E158I S T3420C $ UNIT 0182 
BG E158I T T3420C $ UNIT 0182 
BG E1581 S T3420E $ UNIT 0182 
BG E158I T T3420E $ UNIT 0182 


BG E107I OPTIONS ARE NTL,NEL,NPP,NFE,NMI,EP,CP,PR,NTR 


BG 01E105D ENTER — DEV/TEST/OPT/ FT 
| Test completion communications | 


BG cancel ! interval 


| 


BG 1I00A READY FOR COMMUNICATIONS 
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EREP 


You can use the IFCEREPI1 service aid program to retrieve all or selected records 
from the input data set(s), edit the records, and write them to any specified 
output device supported ba the Sequential Access Method (SAM). A direct access 
device may be required for allocation of a temporary work data set. SAM is the 
access method utilized for sequentially writing this temporary data. IFCEREP1 
processes SYSREC both sequentially and randomly using the EXCP access method. 


VSE Storage Requirements 

EREP requires at least 100K of virtual storage. This provides for a sort table 
of 4K bytes, the VSE TABSIZE default. The 4K-byte sort table permits the 
processing of approximately 400 records for a report. 

Executing IFCEREP1 


Program IFCEREP1 is the main execution routine for running EREP. EREP parameters 
may be specified only via input statements (SYSIPT). 


The operator should execute the ROD command prior to running EREP from SYSREC. 


Executing IFCOFFLD 


Program IFCOFFLD is a special purpose load of EREP modules that allows you to 
clear SYSREC, under emergency conditions, without losing the data recorded 
thereon. You should create a member of PROCLIB so the operator can start the job 
from the console. 


No parameters are allowed when executing IFCOFFLD. 


° SYSREC is input. 
4 SYS009 is the history output data set logical unit number. 
A System Summary Report is printed. 
7 If message IFC119I is received, alter the SIZE parameter on the 
// EXEC card and, if necessary, alter the partition size. 
1 i a 
| EREP Basic Functions | | EREP Reporting Functions 
| | | 
f 4 
| 1. Create an Accumulation | 1. System Summary Reporting |. 
| data set from the SYSREC. | | | 
| data set. | 2. Trends Reporting | 
| | | 
| 2. Clear SYSREC. | 3. Event History Reporting | 
| | | 
| 3. Copy an input Accumulation | 4. Threshold Reporting | 
data set to an Output | | | 
Accumulation data set. | 5. Record detail and/or | 
| Summary Reporting | 
| 4. Merge data from an | 
| Accumulation data set | 6. Offload | 
and SYSREC. | 
| 
5. Print detail description of | 
| hardware and software error | | | 
records. | 
; | 
6. Summarize and print 
statistics for device | | 
| failures. i [ | 
L l __J 
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ae pan pie ~~ 7 
Statement Usage 

| 

| // JOB EXAMPLE This statement initiates the job. 

| 


| or 


// TLBL WISTINT 


| // DLBL HISTIND 

// EXTENT SYS008,XXXX,1,, 
XXXX,XX (Note 1) 
// ASSGN SYS008,cuu 


| 
t 
| 
1 
| 
| 
| 
| 
| 
| 
| 
| 
| 


}—_—_—- 


or 


// DLBL HISTOD 


// TLBL HISTOT 


These job control statements are used | 
to process history input. Either history| 
input or SYSREC input or both must be 
processed each IFCEREP1 execution. The 
ASSGN statement must always be used for | 
history input. The TLBL is used for | 
tape resident history input; the DLBL 
and EXTENT for disk resident history | 


| wae 


| 
| 


// EXTENT SYS009,XXXX,1,, | 
XXXX,XX (Note 1) | 
// ASSGN SYS009,cuu | 


input. | 

-— 
These job control statements are used 
to create a history output data set. | 
The TLBL statement is used for tape 
resident history output; the DLBL and 
EXTENT statements are used for disk 
resident history output. 


| 
| 
aan — 


// DLBL IJSYS01 
// EXTENT SYS001,XXXX,1,, 
XXXX,XX (Note 1,2) 


| 
| 
| 
| 
| 
| // ASSGN SYSOO1,cuu 
| 
| 
| 
| 
| 


| 
| 


Notes: 


2. SYSOO1 must be a ONE EXTENT data set. 


// EXEC PGM=IFCEREP1, 
SIZE=100K 


SYSREC 


SYSLST 


SYSLOG 


SYSIPT 


These job control statements are used | 
to define the temporary work data set | 
on a direct access device. These state-— | 
ments are necessary when a history input| 
data set is read (Note 3). Records are | 
handled via SAM in undefined format. The| 
EXTENT and DLBL statements should not be| 
necessary as SYSO01 should already be | 
defined for the linkage editor. The | 
standard SYSO01 EXTENT should provide | 
enough space for most IFCEREP1 execu— | 
tions; at any rate, enough space must | 
be allocated to store all records selec-| 
ted from the input data set(s). | 


This statement specifies the program | 
name to be executed. The minimum virtual 
region size for DOS/VSE is 100K. GETVIS | 
requires 1K for each 100 records to be | 
processed. 


The following system logical units are used by IFCEREP1 but should | 
| already be assigned. 


The assignment for the System Recording data set | 


must already 


Both message 
this logical 


If SYSLST is 


written to the console. | 
IFCEREP1 input parameters and control cards are 


input to this required system logical unit. | 


_ 


| 
| 
| 1. Ask your system programmer how to code EXTENT statements. 
| 
l 


be made. | 


output and report output are sent to | 
unit. | 


unavailable, a termination message is 


3. PRINT=NO does not require the work data set for history input. | 
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f 2) ora SEE 
i | EREP Keywords | 
| Logical Units ,#—-———--—— ~— 

| | ACC=Y | HIST=Y | MERGE=Y | ALL OTHER | HIST=N_ | 
L —| = 2 
| SYSOO9 [, ak 4] | | | | 
| sysoos | | X | X | | 
| sysoo1 | | x | x | | | 
| SYSREC | | | 4 | xX | x | 
| SYSLST | X | 4 | 4 | x | x 

| SYSLOG | X | x | X | X | xX 

| SYSIPT | x | X | X | x | X 
A nn I t ee ee | j 


EREP Keywords 


EREP uses parameters to determine the functions requested and any restrictions 
placed on the records to be processed. The parameters are in alphabetical order. 


The default value, if applicable, is underlined. 


are optional; none have to be specified. 
options to ensure they are the ones you want. 
For details please consult EREP User's Guide and Reference (GC28-1378). 


a 
ACC [Y]|N 


Default exceptions: 
THRESHOLD 
CPU=(serial.model 
[,serial.model]...) 
maximum of 6 entries 
CPUCUA=(serial.addr 
[,serial.addr]...) 
maximum of 4 entries 
cUA=(entry[,entry]...} 
maximum of 8 entries 


DATE=(yyddd[}—| , ]yyddd]) 
single date or date range 

DEV=(type[,type]..-) 
maximum of 8 entries | 

DEVSER=(serial[{,serial]...) 
maximum of 8 entries 

ERRORID=(seqno[ ,cpuid,asid, 
hh,mm,ss,t]) 

EVENT [=Y] |=N 

HIST[=Y|=N 

LIA| LIBADR=address 


LINECT=nnn 
Number of lines 
Default=50 lines 
MERGE [=Y] | =N 


MOD=(model[,model]...)} 

maximum of 4 entries 
MODE=}370|370XA|ALL] 
PRINT=}AL|DR|PS|PT|SD|SU|NO] 
SHORT [=Y] |=N 


SYMCDE=[nnnn | nnnX | nnXX|nXXX] 


1 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


Accumulate selected records 


Select CPU by serial number (nnnnn) 
and model (nnnn) 


Select unique device addresses on 
a specific CPU 


Select device/control units by 
unique addresses (nXX, nnX or nnn) 
n=hex digit, X=character 'X' 

Date span for selected records 


Select device type (mnnn or nnXX) 
X=character 'X' 
Select device serial numbers (nnnnn) 
(34XX devices only) 

Valid only for MVS software records 


Provide an event history report 
Indication for input data set 
Select records by Line interface 
base address (XXXX — hexadecimal) 
Number of lines to be printed on a 
page (nnn — decimal) 


Allows merging of EREP input 
(Accumulation data set + SYSREC) 
Select specific CPU-models (nnn or 
nnnn) 


Select format of printout (Note 2) 
Allows suppression of detail 
printing of OBR records 

Select records by fault symptom code 
(33XX — disks only) 

n = hexadecimal digit 

character 'X' 


All keyword parameters in EREP 
However, you should check the default 


eee aces ee epee Settee cy ON Cereer Ce ce AAS I CS NES SS TY OR A SS A SNS es SN eS cence 
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EREP Keywords (cont...) 


Es 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


Notes: 


SYSEXN[=Y] |=N 
SYSUM[=Y] |=N 
TABSIZE=nnnk 
Default=4K for VSE Systems 
TERMN=name 


THRESHOLD= (xxx, yyy) 


TIME=(hhmmm}—| , ]hhmmm) 


TRENDS [=Y] |=N 
TYPE=[C€][D}[E] {H] [1] [M] 


VOLID=(volser[{,volser}...) 


ZERO[=¥ ]=N 


Specifies EREP to produce a System 
Exception Report 

Allows printing of a system 

summary report 

Specify size of internal sort table 


Select records by terminal name 
(VTAM only) 

Specify threshold value for tempo-— 
rary read/write errors (3410, 3420, 
8809 only) — decimal digits 

Time span for selected records 
Time range 
Generate a Trends Report 

Select records by their type 
(Note 1) 

Select records by volume serial 
number (3410,4320,8809,disk) 

1 to 6 alphameric characters 
Clear SYSREC after processing 


[0] {S][T] 


maximum of 4 entries 


a ss pe ee ee ee ee ed 


1. Record Types 
Code Meaning Selection Keywords 


HNORHMMmOQ 


CCH CPUCUA, CUA 

DDR CPUCUA, CUA, DEV 

EOD 

MIH CPUCUA, CUA, DEV 

IPL 

MCH ERRORID (MVS only) 

OBR CPUCUA, CUA, DEV, DEVSER, SYMCDE, TERMN, VOLID 
SFT ERRORID (MVS only) 

MDR CPUCUA, CUA, DEV, LIA/LIBADR, VOLID 


* Other selection keywords apply to all record types. 


2. Print Keywords 


AL 
DR 
NO 
PS 
PT 
SD 
SU 


print all possible detail reports 

request only Data Reduction reports 

no reports will be printed 

print full record and summary 

suppress summary printing (print full record only) 
request detail summaries and Data Reduction reports 
suppress full printing (print summary only) 
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Keyword Parameter Specifications not accepted by EREP. 


Incorrect EREP Parameter Combinations 
(X = Conflicting Parameters) 


NBEO | pd dd Od Od BS DG DS BE ODS MIN oS KM z “s 
L >POHMHA + x x x > >< 5 N 
Eat | ” ar : 7. > 
ere > ie a Lo oA as) 
fr a a a a a ea a 
He oe i x xX > a 6a 4 ® 
we ee > 3) 4 Qu 
Ht MNHN ~ moe wy A ise] “ 
= —— a — ase go 4 p . 
OmHaOAM > x > b< Ob OF = 
j~—— —— 4 a a fo oAM ro 4 A 
Am Ome Pm > DA OB a BO 
SE oP ite Ne 7S a Aah MT ek Oe gO LL tO EE APCS AEE SREP Se IO 4G 3 0: @ + it 
Zor rw bee wy eo UO OH a, a) <3] 
a a a Ee wD DR a 
BOQ x ~ x > es 4 p 3 OS 
we 3 3 on a =. 
Smaeow > ~ A» £oO vy a 
pan reer ome ——-+— ers ron € 0 4 p 
HAS eon ~ dbo Oc 3° i?) et 
ee cera ico hoc ce pre sel Nag REYES EY se ie de reo ao ob Oo “% os 
AHaadnoeaaae NX > OK do be © co o @ nu 6 
patito —— Bi a Wao} 4 or re 
mene > > Pm oon FA 3 oO 
po a Se vo a) Hoe os 
MMe MOMHA > x HAN of BAR x 
ae a a St Pot Of $4 
AM> MMM | M mM ae ar) x eM be > Bo 8 wy 
ANS ord N Os OX Oo ri AO oO 
Ps a a a a a ee te i a2O gry AS Oo 
Adam x > po On ‘¢ »p os 
Se as a + a ov 3 
oDp< > x un 0 6 GS bh Bh 
aa a ° ® ad oa 
OMDOD< > > >< i x > Ho no B® ew 
Pee sels i Sa Gs nS a es ek MH oma vA ne OO x 
OD >< > x > 39d BYP BA 
J a a ee a ee 7) a oO n 
too ~ bet an aw O wy o od 
a i ee el a a ee th ar rh eh en pt ip eS Nn 3 0 o “Al OS “A a 
3} [o4 rd Q rt ico 
Wed ae v0 © Q, > 
“db n > a, 
roo 0 mH - @ o 
[=] mes 4 @ acon ord 
< bd oe vam «a 
A -Q [eal AA ~~ we ae fo) 
i pee ees ae, >a «a0 >mr 4g 
> Be Wom HAHZ a on Oe HH WH O 
iS) a nohH HO MWwMWOUNnNDWAHHO o foe eC) ey] Az > N 
ODSaMAHSPSenazwaadosaesause p 
OMAOAHAMHHOAHOOHRSananaog ° . . . . . 
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roOoHH ail be 
[ ia eat ~ » 
L BH 
a ee ~ tas 
| BAO A bod bea 
n xO Zar ~ 
Bie 
Ril Papeiecetaeineles cones Daren a es a Pa oe a ee Sra ay ee 
pp 
: =oa neo ~ 
f}-------"== poanaeanniene 
= AHtNH Ha tOMm *~ ba] 
i for 
° HMM MOMHA * bat 
ar | 
- ee a 
“ AM>PNmm mM PDS BS DS PS PS Dd Dd DS DM 
r)) ee ee ee ec NN SS A NEY se 
c ': alae 
Am > tad ie 
Ba 
Oop =| ba) | 
oADOoOD Bab >» bad 
Om as bo | 
ey ee Co gee HR RAD OR a | 
HOA nnes mei a 
eH WN uy uu bt utraibao 
Mm | Be ee OD 
Oo<t & Zz WMD azn 
a 24 aa WW fy ts] 
Hota | > wm Pi oe 
My = 2 Ay a 


at yn cae 


selections are invalid. 


All other combinations are valid. 


X means, 


Note: 


The following devices are allowed: 3410,3420,8809,34XX. 
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|: 
Examples for an EREP-run x 


(For further examples please refer to 'EREP User's Guide and Reference’ 
GC28-1378) 


1. Copy SYSREC to a tape data set . 2. Print a summary report from tape 


// JOB EREP . {/ JOB SUMMARY a 
// TLBL HISTOT . // TLBL HISTINT &£ 
// PAUSE ASSIGN SYS009 TO TAPE . {/ ASSGN SYS008,SYS009 . 
// PAUSE ISSUE ROD COMMAND . // ASSGN SYS009,UA Ny 
// ASSGN SYSO01,cuu . // EXEC IFCEREP1,SIZE=AUTO . 
// DLBL IJSYS01 . SYSUM 

// EXTENT SYS001,xxx ... . ACC=N 

// EXEC IFCEREP1,SIZE=AUTO . TABSIZE=50K 

PRINT=NO . ENDPARM 

ACC=Y . [* 

ZERO=N . //f MTC REW,SYS008 

ENDPARM . f& we 
// MTC REW,SYS009 ; f 
Tne te eeP ee eee e) Ser cn eS ge at teny te ee te ede aie Re eg ae, ee ge \i 
3. Update the history tape (Merge SYSREC with existing history tape) S, 
// JOB MERGE 


// TLBL HISTOT, 'EREP.HIST.TAPE' ,nnn 

// TLBL HISTINT, 'EREP.HIST.TAPE' ,nnn 

// PAUSE MOUNT SCRATCH TAPE AND ASSGN SYS009 
// PAUSE MOUNT EREP.HISTORY.TAPE AND ASSGN SYSO08 
// EXEC IFCEREP1,SIZE=AUTO 

PRINT=NO 

MERGE 

ACC=Y 

ZERO= 

ENDPARM 

// MTC REW,SYS009 

// MTG REW,SYS008 

/& 


Th. 
an 


a 
“ee mo, 
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Abbreviations Used in EREP Output 


BPI 
BUFE 
BYTES RD/SRCHD 
CCH 


Bits per inch 

Buffer error 

Megabytes read/searched 
Channel check handler 


CCH-CRH CCH-Channel reconfiguration hardware 
CCH-INC CCH incomplete record 

ww CDDA Command data 
CHNL Channel 
CHP/CHPID Channel path ID 
CK or CHK Check 
CLNACT Cleaner action 
CMD or CMND Command 
CNT or CT Count 
CNTRL Control 
CNTRLR or CTLR or CT Controller 

a COMP/MOD Component /Module 

CONS+UR Console plus unit record 

— CORR Correctable 
COR Corrected 
CPU or CP Central processing unit (Processor) 
CRW Channel report word 
CSECTID Control section (CSECT) identification 
CSID Channel set ID ‘ 
CSW Channel status word 
CTLID Controller ID 
c.U. Control Unit 
CUA Channel-control unit-device address 
DATAXFER Data transfer 


DATA CKS CORR/RTRY 
DDR 

DDR-OPR 

DDR-SYS 

DEV or DEVNO or 
DEVNUM or DNO 


Data checks correctable/retry 
Dynamic device reconfiguration 
DDR-Operator requested 
DDR-System requested 

Device number 


DEVT Device type 
DRCT Storage director 
DTE Date 
EOD End of day 
EQUCHK Equipment check 
EQUIP Equipment 
ERDS Error recording data set (SYSREC for VSE) 
ERROPS Error operations 
ERSGAP Erase gap 
ESW Extended status word 
: EXTD External damage 
Cd FCG Floating channel group 
FLG Flag 
FMT Format 
HDR SER Header (tape)/serial number of drive that 
created tape 
HIRS Hardware instruction retry (successful) 
ID Identification 
INV Invalid 
INVK Invoked 
‘ IPL Initial program load 
7 j IRB Interrupt response block 
vd LEN Length 
MB/MBYTE Megabyte 
MCH Machine check handler 
MCH-TRM MCH-System terminated 
MCK Machine check 
MDR Miscellaneous data record 
MDR-DAS DASD (disk)-MDR record 
MIH Missing interrupt handler 
: MIH-CE MIH-channel end pending 
: MIH-DE MIH-device end pending 
~ep OBR Outboard record 
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Abbreviations Used in EREP Output (cont...) 


OBR-DMT 
OBR-PPA 
OBR-EOD. 
OBR -=PRM 
OBR-SHT 
OBR-TMP- 
OVERRN or OVRN 


OVERRUN CDDA or CDDA 


PCUA 

PERM or PRM 
PFU 

PRGM INT 
PRI 

PROG-EC 

PSW 
RCVRYXIT 


SEC 

SEEKS CNTR/HH 
SFT 

SFT-ABN 
SFT-MCH 
SFT-PI 
SFT-RST 

SLH 

Sto 

SKS 

SNID. 

SPID 

SRCHD 

SSYS ID 
STOR 

TEMP or TMP 
TERM 

UCB 

VOLID 

WRT CS): 


OBR-Demount record 

OBR-Dynamic pathing availability 
OBR~-End-of-day 

OBR-Permanent error record 
OBR-Short record 

OBR-Temporary error 

Overrun 

Overrun command data/command data 
Primary channel-control unti-device address 
Permanent 

Probable failing unit 
Program-initiated 

Primary 

Program-extended control mode 
Program status word 

Recovery exit module 

Read error(s) 

Record type 

Routine 

Retry 

Subchannel status word 

System control program 

Storage control unit 

Secondary channel-control unit-device address 
Storage control unit ID 

Storage director 

Secondary 

Seek errors cylinder track/head 
Software (record) 

SET-ABEND record 

SFT-machine error, recoverable 
SFT-program interrupt 
SFT-restart 

Subchannel logout handler 

Start 1/0 

Seeks; data access errors 

Sense path group ID ¢DPA) 

Set path group ID (DPA) 
Séarched 

Sub-system identifier 

Storage error 

Temporary 

Terminal 

Unit control block 

Volume serial number 

Write error(s) 
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SDAID 


General Information 


You submit the SDAID statements with one of the following methods: 


Direct input mode in the attention routine or partition. 


Job control procedures in a partition. 


Prompts in the attention routine (AR). 


Initialization in Direct Input Mode 


In direct 
attention 


The SDAID 
TRACE and 


input mode the SDAID information is entered in form of commands to the 
routine or as SYSIN statements in a partition. 


program identifies the mode of initialization via the format of the 
OUTDEV statement. In direct input mode these statements must contain 


at least one operand. 


The following examples show two initialization jobs, one entered in a partition 
the other one entered via SYSIN. 


Example of a trace initialization in direct input mode in the attention routine: 


L 


==> sdaid }} 

AR 4CO5I PROCESSING OF 'SDAID' CONMAND SUCCESSFUL. 
AR 11401 READY 

==> outdev tape=280 # 

AR 4CO5I PROCESSING OF 'OUTDEV' COMMAND SUCCESSFUL. 
AR 1I40I READY 

==> trace sio unit=009 # 

AR 4CO5I PROCESSING OF 'TRACE' CONMAND SUCCESSFUL. 
==> trace io unit=009 output=ccw # 

AR 4CO5I PROCESSING OF ‘TRACE’ COMMAND SUCCESSFUL. 
==> ready }#} 

AR 4CO5I PROCESSING OF 'READY' COMMAND SUCCESSFUL. 
AR i1I40I READY 


# 


indicates the Enter key pressed | 


Example of a trace initialization via direct input mode statements read in from 
SYSIN: 


| 
| 


// EXEC SDAID 


TRACE SIO UNIT=009 
TRACE IO UNIT=009 OUTPUT=CCW 


/ ts 


f 
OUTDEV TAPE=280 | 
| 
| 
| 


t 5 


Initialization via Job Controj Procedures 


ine easiest Wav TO initialize a trace is to use cataloged procedures. An 
example of such a trace procedure statement is shown below. 


Far ovamnle: 


// EXEC PROC=SDIO.UNIT=009 . TAPE=280 | 
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Initialization via Prompts in the Attention Routine 


You start the initialization process with the attention routine command 'SDAID' 
The necessary trace definitions are given in response to promptings after you 
entered the TRACE or OUTDEV statement without an operand. 


You enter the prompt mode whenever you define these two commands without an 
operand. 


Example of a trace initialization via prompts in the attention routine: 


Eos 8 a Pf i ae ee ee Se oe EIEN ees pe eg ag oe oe) 
| ==> sdaid # 

| AR 4CO5I PROCESSING OF 'SDAID' COMMAND SUCCESSFUL 
| ==> outdev # 

| AR 4CO8D SPECIFY OUTPUT DEVICE. + 

| ==> tape # 
| ie 
| 
| 


# indicates the Enter key pressed 
SS ane ae 


Ltete tot ees 


Note that you enter the prompt mode also if you specify direct input mode 
statements combined with prompt mode statements like a question mark (? requests 
the help function of SDAID). 


The example below shows, how you can combine the two input modes. You would be 
prompted after the question mark has been processed. 


TRACE SIO AREA=BG ? 
~— direct input—>|< prompt mode 
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Trace Type Summary 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
L 


"Trace Type' 


BRanch 
BUffer 
CAncel 
EXTernal 
INSTruction 
Io 
MONitorcall 
PAGing 
PGMCheck 
PGMLoad 
REGister 
SIO 

STorage 

SVC 

VTAMBU 
VTAMIO 


| 'Provides a Trace of:' 


b— 


instructions which caused a branch 
the trace buffer full condition 
program (main task) cancel or EOJ 


external interrupts 

selected or all instruction(s) execution 
I/O interrupts 

MC instructions 

page faults 

program checks 


phase load requests, or actual load 


SIO instructions 

storage alterations 
executed supervisor calls 
usage of ACF/VTAM buffers 
VTAM I/0 operations 


System Performance Degradation 


The tracing of events with SDAID may affect overall system performance. 


| 

| 

| 

| 

H 

| 

| 

| 

| 

| 

| alteration of general purpose registers 
| 

| 

| 

| 

| 
ibe 
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$$ 


| 
= 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


This 


may especially affect time dependent programs (such as programs controlling MICR 


equipment or doing input/output via telecommunication lines). 


When you invoke SDAID in the AR, console input is blocked during processing of 
each SDAID command until the final READY command has been processed 
successfully. 


SDAID Space Requirements 


Space Requirements during Initialization in the AR 


The SDAID set-up phases require approximately 100K bytes of virtual storage 


within the system GETVIS area. When initialization is complete (the READY 
command is processed successfully), that GETVIS space is released. 


Space Requirements during Initialization in a Partition 


Beside the GETVIS space of 100K bytes the phase SDAID (called via EXEC SDAID) 


requires approximately 16K bytes of partition virtual storage. 
significantly less than the minimum VSE partition size. 
run in any foreground or background partition. 


Space Requirements for SDAID Execution 


This is 


Therefore SDAID will 


The amount of storage required for SDAID execution depends on the combination of 
trace operations that you request and on the size of the output buffer 


(specified in the OUTDEV command). 


Basic requirement for SDAID execution: 


Additional requirements 
Per specified trace: 


The size of the SDAID area allocated by default is 48K bytes. 


If BUFFER=nn 
If OUTPUT is 
If OUTDEV is 
If OUTDEV is 


is specified: 
used in the trace commands: 


a printer: 


a printer and OUTPUT is defined: 


12K 


2K 


2K + buffer size 


12K 
8K 
16K 


The size of the SDAID area may be increased during IPL using the SDSIZE 


parameter of the SYS command. 
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SDAID in Direct Input Mode 


Statement Format Considerations 
. The various operands may be separated by a comma or by at least one blank. 
° Enter all operands in the order explained. 


. Most keywords may be abbreviated. The possible abbreviation is shown 
through lower case letters. 


° Mandatory operands are highlighted. 
¢ Optional operands are enclosed in square brackets '[}' 
° Operands separated by a '|' denote choices one of which must be selected. 


. Command continuation is allowed. It is specified by a trailing minus sign 


('-"). 


° Comments may be specified via SYSIN together with SDAID statements or as 
separate comment lines. 


A '/*' sign specifies the begin of a comment. All text from the '/*' sign up 
to the end af the line is treated as a comment. '/*' must not start in 
column 1. 


Start SDAID Trace Initialization 
[//] EXEC SDAID | SDAID 
You start the initialization process with the statement '‘SDAID'. 
If you want to set-up the trace from the AR, type only ‘sdaid'. 
If you want to initialize the trace in a partition via SYSLOG, enter "exec 


sdaid’ in that particular partition. 
Submit ‘exec sdaid' or '// exec sdaid' if you use SYSRDR as input device. 


End the SDAID Trace tnitialization 


READY In the Attention Routine 
feo Ina Partition via SYSIPT000ts=—~=<“C=~s—i‘“‘—~S*~*~*~™S 
FOR” ie parckeenvisGolssie = 

You end the initialization process with the statements "READY' or ‘/*'. Now you 


ean start the initialized trace with the AR command STRTSD. 


Define the Output Device in Direct Input Mode 


OUTDEV [BUffer=nn] [Tape=cuu|Printer=cuu} 


c ars ae t. T ce al t 
Device | Buffer | ‘Output when:' | ‘SDAID Statements’ | Note | 
aes T aaa Peo os 1 
Printer j{ no | immediatelv OUTDEV P=cuu i 1 j 

! ' i : ' ' 1 
| Tape | yes | 3K buffer full | OUTDEV T=cuu ; 2 | 
1 1 | ! 
- | yes | - OUTDEV BU=nn ; 3 | 
Printer | yes | certain event | OUTDEV BU=nn P=cuu {| 4 i 

| | occurs TRACE type OUTP=BU_ | | 

| fape | yes | certain event OUTDEV BU=nn T=cuu 5 | 
| | | occurs | TRACE type OUTP=BU | 
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Notes: 

1. No buffer is allocated. The event records are printed on the printer with 
the device address cuu. 

2. The event records are written into a 3K bytes buffer. This buffer is written 
to a tape mounted on the device cuu when it is full or when an ENDSD or 
STOPSD command is issued. 

3. A trace defined with this OUTDEVY statement writes the event records into a 
wrap-around buffer. You can retrieve the trace records only with the 
attention routine command: DUMP BUFFER,cuu 

4. A trace defined with this OUTDEV and TRACE statement prints the contents of 
the buffer when the event (type), defined with the TRACE statement, occurs. 

5. The defined wrap-around buffer is written to tape (cuu) when the trace event 


(type) occurs. 
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The TRACE Statement 


TRACE BRanch ARea= [-] 
(OUTPut=] [-] 
[OPTion=] 


ee ee ee ee ee ee ee ee ee eee ee rea ey 


TRACE CAncel ARea= {-] 
{OUTPut=] [-] 
[OPTion=] 
TRACE EXTernal [KEY]{TIMER][SIGNAL] [-] 
[OUTPut=] [-] 


TRACE INSTruction=opcode| (opcodel opcode2 ..){*|{BRanch ARea= [-] 
[OUTPut=] [-] 


[OPTion=] 
TRACE 10 [ARea=BG|Fn|]SUPvr|ALL] [-] 
[UNit=|CHannel=|CU=] {[-] 
(OUTPut=] {-] 
{OPTion=] 
TRACE MONitorcall=mc|(mcel mc2 ..)]* ARea= [-] 
[OUTPut=] [-] 
[OPTion=] 
TRACE PAGing ARea= [-] 
[OUTPut=] [-] 
{[OPTion=] 


TRACE PGMCheck=pgmc|(pgmcl pgmc2 ..}|* ARea= [-] 
[OUTPut=] [-] 
[OPTion=] 
TRACE: PGMLoad [ALL|REQ|HDL] [PH=phase] ARea=  [-] 
{OUTPut=] [-] 


[OPTion=] 
TRACE REGister=reg|(reg1 reg2 .. reg8) [PATTern=pp|(pp nn)] [-] 
ARea= [-] 
[OUTPut=] [-] 
[OPTion=] 
TRACE SIO [ARea=BG|Fn|SUPvr[ALL] [-] 
(UNit=|CHannel=|CU=] {-] 
[OUTPut=] {-] 
[OPTion=] 


TRACE STorage [PATTern=xxxxxxxx] ARea= ADDress= [-] 
(OUTPut=] [-] 
[OPTion=] 
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TRACE SVC=svc|(svcl sve2 ..)|* ARea= [-] 
[OUTPut=] [-] 
[OPTion=] 


TRACE VTAMBU [OUTPut=] [-] 


[OPTion=] 


TRACE VTAMIO ARea=BGIFn  [-] 
[UNit=|CHannel=|CU=] [-] 
[OUTPut=] (J 
{[OPTion=] 


Additional Definitions 


| Operand = | Function 

| ARea | Limit tracing to a certain system area. 

| ADDress | Limit tracing to a certain address range. 
| OFFset Limit tracing in a partition or phase area. 
| PHase | Limit tracing to a certain phase. 

| LTA SVA | Define additional trace area. 

| UNit | Define the device address. 

| CHannel | Define the channel address. 

| CU | Define the control unit address. 

| OUTPut | Define additional trace output. 

| OPTion | Define additional trace options. 


ARea=partition-id [ADDress=]{LTA|SVA| (LTA SVA)]| 
=partition—id [OFFset=][LTA|SVA| (LTA SVA)]| 
=partition-id [PHase= [OFFset=]][LTA|SVA| (LTA SVA)]| 
=SUPvr [OFFset=|ADDress=| PTA] | 
=ALL [ADDress=] | 
=space—id [ADDress=] 

ADDress=addr1:addr2|addri:*|0:* 

OFFset=reladdri:reladdr2|reladdr1:*|0:* 

PHase=phase~name [OFFset=] 

LTA|SVA| (LTA SVA) 

UNit=cuu| (cuu cuu) | (cuu-cuu) 

CU=cu] (cu cu) | (cu-cu) 

CHannel=c|(c c)|(c—-c) 

OUTPut=definition|(definitionl definition2) 

OPTion=definition| (definitionl definition2) 

HALT 
NOJCL 


TERMinate 
OCCurrence=occl:occ2 
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Output Definition Summary 
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| Definition | What it pacoxdeypeinte in adateaone | 
| BUE fer . | Contents of SDAID output buffer | 
CCB CCB or IORB (TRACE=I0, SIO, or VTAMIO only) | 
|! CCW | CCWs (TRACE=10,SI0O, or VTAMIO only) | 
CCWD=nnnn | CCWs plus nnnn bytes of data (TRACE=I0, SIO, or | 
| | VTAMIO only) | 
COMReg | Partition communication region | 
CREG | Control registers | 
DUMP | Virtual or real storage 
| FREG Floating point registers | 
| GREG | General purpose registers | 
{ I0Tab | PUB, LUB, ERBLOC, ERRQ, CHANQ | 
| LTA ) Logical transient area 
| LOwcore | Processor seohine from zero to X'BC' | 
| PTA | Physical transient area 
| PIB ee information block | 
| PTAB | Partition related control blocks | 
| SUPvr Supervisor plus GREG and CREG | 
| SYSCom | System communication region 
| TOD | Time—of—Day clock | 
TTAB ! Task related control blocks 
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‘ayy SDAID via Procedures 


Summary of Trace Procedures 


Wi feng, eae ee ANG A ae ay SGN ag? eee a | age Ce ee eg Pere ng ee eG 


| Procedure | ‘Provides Information on:' 


| SDBRANCH | successfully executed branch instructions 
~~ | SDINST | selected or all instruction(s) execution 
| spIo | I/O interrupts and SIO instructions 
| SDLOAD | phase load requests, or actual load 
| SDPGMC | program check interruptions 
: | SDREG : contents or alterations of 1 to 8 registers 
F . ' 
‘ \ | SDSTOR | storage alterations 
Td | SDSVC : executed supervisor calls 
t sores: Oe - 


Trace Initialization Procedures 


Le ct a a a a es 


// EXEC PROC= SDBRANCH, AREA=partition-id[ ,OFFSET=|ADDRESS= | PHASE= =OFFSET=] 


=SUPvr{ ,OFFSET=| ADDRESS=] 
=ALL | space-idfADDRESS=1 
[,OUTPUT= ] 


[ .OPTION=NOJCLIopt|'opt1 opt2 ... 


[,BUFFER=nn][,BUFFOUT= ][,TERM=] 
{,Tape=cuu|Printer=cuu} 


=ALL|space-id[ADDRESS=] 


{ INST=*|inst]|'instl inst2 ..'1 
{,OUTPUT=GREG|'outpl outp2 ...’] 
[ ,OPTION=NOJCL{'optl opt2 ...'] 


{| ,BUFFER=nn]{,BUFFOUT= 1[ ,TERM=] 
{ .Tape=cuuiPrinter=cuul 


// EXEC PROC=SDI1O 


{ ,UNIT=cuu}"cuul cuu2 ..'] 

| [ AREA=BG|Fn] 

ET od | ,OUTPUT='CCWD=256' |‘ outpl outp2 ...°] 
[ OPTIONS 1 


[ .BUFFER=nn][{.BUFFOUT= 1|f .TERM=1] 
{ .Tape=cuu] Printer=cuul 


// EXEC PROC= SDLOAD.AREA=partition-idISUPvrI 
-~ALLISpace-id 
f .PHASE= phasename] 
| .AADDRESS=0:* ji addrl:addr2] 
[ .OUTPUT= 1[ .OPTION= 1 
| .BUFFER=nn|[.BUFFOUT= ]f .TERM=] 
I 


~lape=cuul Printer=cuu! 


// EXEC PROC=SDPGMC.AREA= Barton: idl SUPvri 
=ALL| space-id 
[ PGMC=*jpgmc|]'pgmcl pgmc2 .."] 
| .ADDRESS=0:**|addrl:addr21 


| .OPTION= | 
| ,BUFFER=nn][,BUFFOUT= ][,TERM=] 
|, Tape=cuu| Printer=cuu] 


| od ee ee eee ee ee ee ee ee 
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// EXEC PROC=SDINST,AREA= partitions id[ , OFFSET=| ADDRESS=| PHASE=OFFSET=] 
=SUPvr{.OFFSET=! ADDRESS=1 
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// EXEC PROC=SDREG,REG=reg|'regl reg2 ..' 
,AREA=partition-id[ , OFFSET=| ADDRESS=| PHASE=[OFFSET=} ] 
=SUPvr[ , OFFSET=| ADDRESS=] 
=ALL | space-id {ADDRESS=] 
[ ,PATTERN=xxxxxxxx | 'xxxxxxxx yyyyyyyy' ] 
[,OUTPUT= ] 
[,OPTION= ] 
[,BUFFER=nn]}{,BUFFOUT= ][,TERM=] 
[, Tape=cuu|Printer=cuu] 
// EXEC PROC=SDSTOR, AREA=partition -id[ , OFFSET=| ADDRESS=]| PHASE=OFFSET=]} 
=SUPvr[ ,OFFSET=| ADDRESS=] 
=ALL] space-id[{ADDRESS=] 
[ , PATTERN=xxxxxxxx ] 
{ ,OUTPUT= ] 
[,OPTION= } 
{,BUFFER=nn][,BUFFOUT= }[,TERM=} 
[ ,Tape=cuu|Printer=cuu} 
// EXEC PROC=SDSVC,AREA=partition-id[ ,OFFSET= | ADDRESS=|PHASE=OFFSET=] 
=SUPvr[,OFFSET=|ADDRESS=] 
=ALL]space-id{ ADDRESS=] 
[,SVC=*|svc|'svcl sve2 .."] 
[ ,OUTPUT= ]} 
[,OPTION= ] 
[ ,BUFFER=nn][,BUFFOUT= ][,TERM=] 
[, Tape=cuu]Printer=cuu] 


ee mw wm meme ee ee ee ee ee wwe ee ew eee eee mee eee wee ew eee eee wee ween 


Additional Keyword Operands in Trace Procedure Statements 


Fa oe tee ee ee ee ep eo 
| Operand | Function | 


| 


| ADDRESS | Limit tracing to a certain address range. | 
| AREA Limit tracing to a certain system area. | 
| OFFSET | Limit tracing to a partition or phase area. | 
| PHASE | Limit tracing to a certain phase. | 
| OPTION | Define additional trace options. | 
| OUTPUT Define additional trace areas. | 
| UNIT | Define the device address. | 
| BUffer | Define the size of the output buffer. | 
| BUFFOUT | Define the event to write the buffer. | 
| TERM | Define the event which terminates the trace. | 
| Printer | Define the printer device address. | 
: Tape | Define the tape device address. 
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Define the Output Device in a Procedure Statement 


[BUffer=nn] [Printer=cuu|Tape=cuu] (Note 1) 
BUFFOUT=CANCEL | PGMC | FULL| EXT (Note 2) 
TERM=CANCEL | PGMC | EXT (Note 3) 


ew mw mw ew eww em me ewww wm me wee ee em ew em eee we em ee ewe eee mw me etm ween 


ld Notes: 


1. The definition of a large wrap-around buffer may cause a lack of SDAID 
storage. 


2. If you specify BUFFOUT=CANCEL or BUFFOUT=PGMC the keyword operand 
"AREA=BG|Fn' has to be specified, too. 


sy 3. If TERM=CANCEL or TERM=PGMC is specified, the AREA=BG|Fn has to be specified 
\ also. 


aw 
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SDAID in Prompting Mode 


Input Command Summary 


a a a ae NR, Ge GO qT Oe en Ge ey gute Te Me SP SE a fp ee Pe 


| Command | Description | 
| SDAID | Attention routine command to invoke the SDAID program. | & 
| OUTDEY | Defines output device for the trace | - 


| (printer, tape, or buffer), | 


| TRACE | Defines the event(s) to be traced. At least one TRACE | 
| | command is required; up to ten may be submitted. | 


| READY | Ends input of initialization commands OUTDEV and TRACE. | 


a Se} 


a” 


f 
The various SDAID Commands 
SDAID prompts you for output device of the trace when you enter OUTDEY. 
One OUTDEV definition can be active in the system at one time. Any newly 
entered OUTDEV command overwrites the existing one. 
Enter TRACE to be prompted by SDAID for the type(s} of traces you want. Up to 
ten "TRACE' commands may be entered in one session. 
You end the trace initialization in the attention routine with the READY 
command. When the READY command has been processed, no further OUTDEV or TRACE 
command can be entered. 
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Sample SDAID Trace ftnitialization via the Attention Routine 


SDAID Trace Initialization 


| ==> sdaid # 
| 4CO5I PROCESSING OF 'SDAID' COMMAND SUCCESSFUL 
| ==> outdev # 
| 4CO8D SPECIFY OUTPUT DEVICE. + 
| ==> buffer # 
| 4CO8D SPECIFY SIZE OF WRAP BUFFER. + 
| ==> 8 } 
{ 4CO8D SPECIFY OUTPUT DEVICE FOR BUFFER. + 
| ==> tape # 
| 4CO8D SPECIFY PHYSICAL ADDRESS OF PRINTER/TAPE. + 
| ==> 281 # 
| 4CO5I PROCESSING OF 'OUTDEV' COMMAND SUCCESSFUL. 
| ==> trace # 
| 4CO8D SPECIFY TRACE TYPE. + 
| ==> inst # 
{ 4CO8D SPECIFY OP CODES OR * OR BR. 
| ==> * if 
| 4CO8D SPECIFY TRACE AREA. + 
| ==> bg # 
| 4CO8D SPECIFY TYPE OF LIMITS. + 
==> jf 
| 4CO08D SPECIFY ADDITIONAL TRACE AREA. + 
==> ff 
4CO8D SPECIFY OUTPUT. + 
==> # 
| 4C08D SPECIFY OPTIONS. + 
==> nojcl # 
| 4CO8D SPECIFY OPTIONS. + 
==> it 
4COSI PROCESSING OF 'TRACE' COMMAND SUCCESSFUL. 
==> ready # 
4COSI PROCESSING OF 'READY' COMMAND SUCCESSFUL. 
AR 015 1I40I READY. 


 etemmmcteeiaaimenemtanne ied 


Notational Conventions 


. SDAID messages (or help information) are shown in upper-case with a message 


number. 


© Responses or commands for you to enter are shown in lower-case. In most 


cases a short form of the command is also allowed. 


. It is possible to abbreviate the SDAID parameters. For example the BRanch 
trace type specification can be abbreviated in the following way: 


BR BRa BRan BRanc BRanch 


Note that the minimum definition is indicated through capital letters. 
° The symbol + indicates you are to press the ENTER. key (generally after 


entering any response or command). 
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How to Use Help and Cancel in Prompt Mode 


Messages for which you can request additional help information are indicated 
by a plus sign (+) at the end of the message. 


Request additional help by entering a question mark (7). 


You can cancel data entered for the current command by entering two question 
marks (?7). 


Figure below shows how you can request help information and how the 
initialization process can be canceled. 


==> trace # 
4CO8D SPECIFY TRACE TYPE. + 


| 

| 

=>? # | 
ENTER ONE OF THE FOLLOWING KEYWORDS: | 

SVC PGMCHECK § MONITOR CANCEL | 
INSTR REGISTER | STORAGE BRANCH | 
PAGING PGMLOAD EXTERNAL BUFFER | 

10 S10 VTANIO VTAMBU | 

==> 272 # | 
| 


4D03I COMMAND CANCELED DUE TO USER REQUEST 


OUTDEV Command Input Path 


r—— SPECIFY OUTPUT DEVICE 


SPECIFY SIZE OF WRAP BUFFER 


| 
| 
| | 

| | (~—- SPECIFY OUTPUT DEVICE FOR BUFFER 
| 

Vv 


| | 
v v 
OUTDEV>—->0—-BUffer—O— nn —O......... Fh, edhe Bia sue & ieee >5 
| | SPECIFY PHYSICAL ADDRESS 
| OF PRINTER/TAPE 
| | 
| | V 
| /-Printer—>->——0— _cuu >; 
| U—Tape >| 
| | 
Oe ee ee ee eer 
| 
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TRACE Command Input Path 


TRACE 
| p-— SPECIFY TRACE TYPE 
| Vv 
a a 
| | | 
ey ee eee ee ome | 
| r— SPECIFY TYPE OF EXTERNAL INTERRUPT LH 
| Vv pa 
|—EXTernal Orsueccs i ee : >| 6 | 
bd | ha es 2 
Vv 
| ooo Soman ergs 178 Goan ica ad 
| | TIMER] 
| ‘SIGNAL! 
| 
| r— SPECIFY OP CODES OR * OR BR 
| V 
. | -INSTr ————0 * = = 
‘ t-—op-codes——_} | 
‘ee a | L_—BRanch———__1 | 
| | | 
| -—— SPECIFY MONITOR CALL CLASS(ES) OR * | 
| V | 
 SMONdtercal1--o-———_——__ * * >| 
L——-monitorclass—list—— | 
| 
| —PAGing ————— | 
| | 
| rp SPECIFY PGM INTERRUPT CODE(S) OR * | 
Vv | 
|--PGMCheck: 0 Be | 
'_pgmc~codes | 
| | 
| SPECIFY PGMLOAD TRACE OPTIONS | 
| | SPECIFY NAME OF PHASE | 
| | TO BE MONITORED, OR PRESS | 
| | | END/ENTER | 
| | | | 
| v V | ae 
|_PGMLoad—————0....... REL od aiues a 2 OMT ap ee OT 
| | c ,—— | phasename-—— Wy 
| | 9 [od AREA 
| U(——— HDL —1-)- definition 
| = REQ = 
| 
| r—— SPECIFY REGISTER NUMBER(S) 
| | 
ld | —— SPECIFY REGISTER 
| Vv V PATTERN 
/K-REGister-——0—reg—numbers O.... # ..(every)....--—4 
| |—patternl—————_> |_| 
| \—patternl pattern2— | 
| | 
| (—— SPECIFY STORAGE PATTERN | 
| Vv | 
\ |-STorage Qecsiadisnecsearsd # .. (every)... -———_> | 
iN | L_____——pattern——__ | 
ee | | 
ww | -—— SPECIFY SVC NUMBER(S) OR * | 
| Vv ae oe 
+—svc-—————0 Fe eee 
| U—syvc—numbers—— Ly 
| - AREA definition 
| 2 | 
es 
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; al * 
[ £ | (TRACE TYPE, cont'd) 
; 
| -—~ SPECIFY PARTITION ID 
i V Po 
f-—T 0-0... .ALL.........0.. >p———>| 5 | 1/0 definition 
| | }+——_partition—id—>| Ly 
f-sto——_ L——_-SUPyr———_-—— 
| 
| 
| 
-—— SPECIFY PARTITION ID 
V nara 
[—VTAMIO-—_-—0 partition—-id—> >| 5 | I/O definition 
Ly 
| 
| 
i - e 
-—VTAMBU : ; >| 6 | Trace output 
! Ly definition 
; 
| =) 
L_RUffer : : >| 8 |. Ocenrrence 
Ly definition 
;— SPECIFY ~—— SPECIFY TYPE OF LIMITS 
| TRACE AREA | t—— SPECIFY OFFSET RANGE 
co =CS«* Vv Vv 
| 2 |>H-partition—-id—>0..OFFset....>0......... Oro... pile iapocane 5 
Lt | | [—reladdr1:*—___—____> | 
| | '_reladdrl:reladdr2 >| 
| | | 
| r— SPECIFY ADDRESS RANGE | 
Vv | 
| f--ADDress——>0....-.0:%...5.. >t 
| | }—addr1:** >| 
| | L—addrl:addr2 >| 
| | Sa 
| >| 4 | 
| see 
| f—— SPECIFY NAME OF PHASE 
[ | V aaa 
L—PHase >0 —phasename——_—————-> | 3 | 
Lo 
| -—— SPECIFY TYPE OF LIMITS 
| ;—— SPECIFY OFFSET RANGE 
Vv Vv f= 
f-SUPvr O...>0FFset...0. .0:% rr | 
| oo * eeetadarts EROS: f ty 
| | L—reladdrI:reladdr2 >| 
| 
| | f-—-SPECIFY ADDRESS RANGE | 
| | Vv | 
| f-ADDress——>0...... Onn k eee ease e | 
| | }—-addr 1: *—____________> | 
| | L—addrl:addr2 >| 
| 
> pt A 
r— SPECIFY ADDRESS RANGE 
V care 
Pspace<1D— ===, One oe... pe OG | 
i Lowden fa | Ly 
| { L—addrt: addr2——-— 
bo AT. [++ 
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. } 
inp? SPECIFY OFFSET RANGE | 4 | .— SPECIFY ADDITIONAL 
i | ‘TRACE AREA 
I V V V =a 
| 3 /—>0.......6. OP ac eee sa 70... # .(none);>| 6 | 
tL LS vedaddet: *$—_______> | | f—; } ty 
'—reladdr1l:reladdr2——_ | ov | | Output de- 
U(——-LTA——-)—|_ finition 
__sva— 
| od -—— SPECIFY RANGE OF I0/SIO TRACE. 
i ne V aan 
| | 5 --——>0..... PP seas (all units traced)........-. r——>| 6 | 
| Lo | | es 
L/o | --SPECIFY CHANNEL ADDRESS | 
definition Vv | 
|----CHanne 1—0—channel address(es )———> | 
. | 
x | 
\ pa SPECIFY CU ADDRESS | 
— j | V | 
[-——CU O—control unit (s)———y;~—> | 
| SS 4 ee ! 
| r—— SPECIFY UNIT ADDRESS | 
| Vv | 
UNit O—device address(es )—~——~ 
(a P Set ee 
r-— SPECIFY OUTPUT 
cs V | 
| 6 -—>0...... eg Gabe eeeaderd -... # ...(mo additional output)..-->] 8 | 
| LI rete ee] Lys 
trace | | | Option 
output cence SG eae Seen ee defi- 
definition OUTPut /-CReg——_____--________—__> | nition 
}-FReg-———--_---_--_---_-___ > | 
| [= CON ge | 
: Syston | 
7 btitep esa ee 
! [-LTA : >| 
| [-PTA : >| 
| |-PIB >| 
! L-CCB >| 
K-Ccw >| 
|-TOD-—— >| 
le a ee |-Lowcore aaa >| 
Ald }-Supvr >| 
}-BUffer — : ——> | 
}-PTAB >| 
| L-TTAB mene >| 
| r~SPECIFY LENGTH OF DATA | 
v | 
i-CcWwD-O—— data length —————>| 
| | 
| -——SPECIFY DUMP AREA | 
P * | V | | See also 
ld ‘_pUMP-O—~ dump definition >———! | Note 1 and 
[ -—4 | 3 at the 
\__see—>| 7 | | end of the 
Ly | dump defi- 
| nition 
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SPECIFY DUMP AREA (see Note 1) 


| 


p—— SPECIFY OFFSET RANGE 


o <——— 
< 


| 7 |-O—partition—id——————O.......... Ota atest vier tests cets tse 
(partition t-reladi:* 


—id) Lreladl:relad2 


p-— SPECIFY OFFSET RANGE 


PHase———_————_-O.......... . SFE toy coon pia ee rene eva ore 
}—-relad1:* 
U_reladl:relad2 


‘i 


L—_gsee Note 2 


rp SPECIFY ADDRESS RANGE 
V 
ADDress-—————_—_———_-0 O:* 
t—addr1:* 
L—addrl:addr2 


rp SPECIFY DUMP RANGE 
Vv 
REG--—_-—_—__---0-—-reg: bytes 


ec ee eee 


Vv V 
——PTR—-0— reg: offset 


orn re et etree een 


Notes: 


1. Up to ten different areas may be specified with DUMP. 


— SPECIFY REGISTER (--SPECIFY OFFSET 
| AND OFFSET | AND DUMP LENGTH 


aaa | 
—_———-——0—-of fset : length-——+——-> | 8 | 


Ly— 


2. Can be specified only if a phase was previously defined in the area 


definition of the TRACE. 


3. You need not specify the word OUTPut in prompt mode. 
the definition of the additional output. 


ee 
| 8 | 
| — SPECIFY OPTIONS 
| Vv 
L—O........ $s sGho-option)sic6e ee elas eek see eee 
| 
SS SS See 
| Vv 
{| 9 -——HALT-_________--__——_,_ | 
| | | 
| -—noseL-—_____-____—_—__-—__—>| | 
Pot ! | 
L (—-Q-—-TERMinate————____—_—_____ >} —_ 
| r— SPECIFY OCCURRENCE | 
| V RANGE | 
—_QCCURRENCE—-0-——_ # —(all) >| 
[}-—___-—_1:* >| 
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Output Device Definition in Prompt Mode: CUTDEV Command 


As a response to prompting message, 


enter one of the following: 


Printer If printer is specified, the event records are written to a line 
printer at the time the particular event occurs. 


Tape When tape is defined, the trace records are written to tape in the 
form of 3K bytes blocks. 


SDAID prompts you for the address of the output device in the 
following way: 


Enter the device address in the form cuu., 


BUffer writes the trace output to a wraparound buffer. SDAID prompts you for 
the size of the buffer as follows: 


ee eee ee ee reer eey 


Enter the desired size of the buffer in number of blocks of 1K bytes. 


Possible Buffer Sizes: 


The possible buffer sizes depend on the output device for the buffer which is 
defined next. 


rr a eT Sh a | 
| Buffer to Printer or no output device { 3K - 99K | 


| Buffer to Tape | 3K - 32K | 
a Na PES a re = ee (rR 


Now, SDAID prompts you as follows: 


Respond with either Printer, Tape, or END/ENTER. 


Pressing END/ENTER causes no output device being defined. 
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SDAID Wait States 


Wait due to OPTION=HALT 


If a TRACE command is specified with OPTION=HALT then the system enters a wait 
state at the occurrence of the speciffed event. The address part of the wait PSW 
contains the value X'EEEE’. The operator may now respond in two ways: 


1. Press the external interrupt key to continue processing. The system will 
enter the wait state again on the next occurrence of that traced event. 


2, Enter X'FF' in storagé location zero, then press the external interrupt key. 
That removes the OPTION=HALT specification. The system continues tracing but 
does no more enter the wait state X'EEEE' on the occurrence of the specified 
event. 


Wait due to I/O Error conditions on SDAID Output Device 


If an I/O error condition occurs on the SDAID output device, then SDAID performs 
its own error recovery. If the OUTDEV device is a printer and is not ready then 
SDAID waits two minutes to allow the operator to make the printer ready. On all 
ether error conditions SDAID performs @ reasonable number of retries. If the 
retry counter is exhausted, or the wait time expires, then SDAID loads a wait 
PSW with a value of X'EEEEEE' in the address part of the PSW. When the SDAID 
program has entered a wait state with X'EEEEEE' in the address part of the PSW 
then the operator should inspect bytes 0=3 of low core to find the appropriate 
etror recovery action. Bytes 0-1 of low core display an error code of the form 
X'62xx'. Bytes 2-3 show the device address of the SDAID output device. 


Here is a summary of all possible error codes which may be displayed in bytes 
O-1 of low core. 


X'62C1' End of tape condition on output tape 
X'62C2' Device not operational 

X'62C3' Missing device end interrupt 

x'62C4' Control unit busy 

x'62c5' Intervention required - device not ready 
X'62C6' Channel error 

X'62C7' BUSOUT check 

X'62C8' UCS Parity|data converter chéck 

x'62C9' Sense missing or wrong 


X'62D1' Attention 

X'62D2' Command reject 

X'62D3' open error 

x'62D4' Invalid I/O function requested 
X'62D5" Stack module terminate 

X"62D6" No print buffer available 

X'62D7' max.number of write rétries exceeded 
X'62D8' max-number of SIO retries exceéded 
X'62D9' Unusual command sequence 


The operator should now try to lift the error condition (e.g. ready the printer 
or tape device, fill new paper or mount artother tape reel). If this is possible 
then press the external interrupt key onéé to continue tracing operations. 


If the error condition cannot be cleared (e.g. the SDAID otitput device remains 
not-operational) then press the external interrupt kéy twice to stop the SDAID 
data collection and restart VSE processing. After that (preliminary) stopping of 
SDAID a STOPSD or an ENDSD command should be given for a final termination of 
SDAID. 
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Types of Dump (Overview) 
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= as 
| Initiated | Output | Output Vit Initiated/Controlled | 
| __by/via | Contents } Device {| by eset 
i System | System- or | Dump Sublib.|| | SYSTEM OPTIONS | | 
| (ABEND) | Partition—Dump| or SYSLST || to Request the Dump | 
| Operator | System- or | Dump Sublib. | | CANCEL | 
| (Console) | Partition—Dump| or SYSLST || Command [ 
| Operator | Selected | Tape or || DUMP 
| (Console) | Storage Areas [ Printer || Command 
b- ee aie : ! 
| Operator | System | Tape or {| STAND-ALONE DUMP | 
(Console) | Storage | Printer || Program 

ap 4 “| ! 
iota /Oper. | Defined | Tape, Printer| | SDAID | 
| Defined Event)| Storage Areas | oor Buffer {|| Dump Trace |. 
I- pj {L- = 
| Programmer {| Macro | Macro I | MACROS | 
| (Macro) | Dependent | Dependent || (PDUMP, DUMP, JDUMP)| 
oes ! tt 


ABEND Dump Function 


What is an ABEND 


ABEND stands for ABnormal END of task. This means that a program (task) is 
terminated prior to its completion because of an error that could not be 


resolved by system recovery facilities. 


What is an ABEND Dump 


The system's ABEND dump function is called by VSE/Advanced Functions system 


either at the occurrence of an ABEND or else if a CANCEL command has been 
issued. Once the function has been called, a dump of virtual storage is 
provided. 


* 


The output device for the dump data is a dump sublibrary or a printer device 


The System-Dump dumps the whole supervisor area and the dump symptoms 


besides the partition area. 


The Partition-Dump includes only selected VSE/Advanced Functions control 
Blocks and the dump symptoms in addition te the partition area. 


assigned to SYSLST. 


Contents of thé ABEND Dump Output 


The output of the ABEND dump function either in the sublibrary or on SYSLST 


contains: 


A dump symptom part which is always included. 


A part which is either a system-dump or a partition-dump, depending on the 
options active at the time the dump was taken. 
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Symptom Part of the ABEND Dump 


This part of the output contains 


° Control data from the symptom record, like information about the environment 
or the failure. 


System-_and Partition-Dump Contents 


A system dump is produced if OPTION DUMP or STDOPT DUMP=YES is active. 
A partition dump is produced when option OPTION PARTDUMP or STDOPT DUMP=PART is 
active. 
The listed VSE/AF System Areas are contained beside the symptom part in: 
S - the System Dump 
P - the Partition Dump 


S,P The ending task PSW, general purpose and floating point registers. a 


$,P If the error occurred in the SVA, that part of the SVA which holds the 


phase responsible for the ABEND. Se 
S,P The partition for which the ABEND dump function is active including areas 
acquired dynamically within the partition by GETVIS macros in your 
program. 
Ss The entire supervisor area. 
s The addresses of the VSE/Advanced Functions control blocks. 
s The allocated portion(s) of the system GETVIS area. 2 
P The LOWCORE (low address storage): (188 bytes - X'00' to X'BC') 
P The areas containing VSE/Advanced Functions control blocks. 
P The logical transient area (LTA), if the error causing the dump to be 
taken occured in a task owning the LTA. 
The DUMP Command Dump 
You can request a dump of parts of or of all the virtual storage with the 
attention routine command DUMP. 
The Stand-Alone Dump £ 
You can request a dump of the applicable VSE/Advanced Functions virtual storage a 
(a stand-alone dump) with the stand-alone dump program. The program (generated 
by DOSVSDMP) can be called from cards, diskette or tape. 
Stand-Alone Dump Program Output on Tape 
The stand-alone dump program stores the dump information on the tape from where 
it has been loaded. The dump information on tape contains the i 
{| 
° symptom record which holds information on the hardware and software X, 
environment, error symptoms and control block locators. 
e dump data, which are retrieved pages from processor storage, or from the 
page data set. 
° last 200 messages from the hard copy file. 
You can print the dump output either with the Info/Analysis program or with the 
DOSVSDMP utility. 
Note: Only active address space will be dumped in a VAE-system. é 
a 
& 
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The SDAID Dump 


The SDAID program can also be used to dump virtual storage. You may 
program for example if you need a dump of a certain part of storage 
event. 


Dump Requested by Macros 


A dump of virtual storage can also be requested through dump macros. 


1985 


use this 
at a defined 
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DOSVSDMP AND STAND-ALONE DUMP 


The DOSVSDMP Utility 
The DOSVSDMP utility includes the following functions: 
¢ Generation of the stand-alone dump program on tape, diskette, or cards. 


* Print the stand-alone dump from tape. 


e Print the DUMP command dump from tape. 


aos 


¢ Format and print the SDAID output tape. 


Generate the Stand-Alone Dump Program 


You cari generate the stand-alone dump program to reside on a magnetic tape, if 
you want to have a quick save of the dumped information for later processing. 


The stand-alone dump program can also be generated to reside on diskette or in f 
cards (no dump information saved for later retrieval since output goes to a am 
printer). 
To generate a stand-alone dump program, invoke DOSVSDMP by entering 
// EXEC DOSVSDMP 
The program, once it receivés control, prompts you for further control 
information, and you select the desired option by an appropriate response to the 
program's prompt as shown. 
cc -~Prompt message 1 
| xx 4G61D SELECT ONE OF THE FOLLOWING FUNCTIONS | 
ts cg pedie Bartle ale Seta etacrele wae wee eek ees hee ee | 
t 4 “GREATE STAND ALONE‘ DUMP PROGRAM | 
| 2 PRINT DUMP TAPE | 
| 3 PRINT SDAID TAPE | 
| R END DOSVSDMP PROCESSING | 
{ j. 
Enter 1 to invoke dump program generation. 
The DOSVSDMP utility responds with 
co [Prompt message : — 
| xx 4G04D SPECIFY OUTPUT DEVICE IN THE FORM SYSNNN OR CUU | 
Geeta iene bene eer tte a, co danny ota fe Bg meat | - 
\ 
The device defined with SYSNNN or CUU can be a: 7 


« Tape device 
* Card punch 
. Diskette device 


If the selected device is a tape drive, it must be either 9-track or 7-track 
with data converter. 


Note: Neither the utility DOSVSDMP nor the generated stand-alone dump program V 
supports the IBM 8809 tape drive in streaming modé. S 


LAN 
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The completion message 


f roe | 
| xx 4GO9I DUMP PROGRAM HAS BEEN CREATED | 


indicates the successful generation of the dump program. 


You need not regenerate the stand-alone dump program when a tape has been used. 
The dump program remains useable for all subsequent stand-alone dump requests. 


The kind of dump program generated depends on the mode of system operation. For 
example, a stand-alone dump program generated under 370 mode, can be used to 
dump also an address space of a VSE system operating in ECPS:VSE mode and vice 
versa. 


Generating the Program on Diskette or Cards 


If you use a diskette or a card unit you will be prompted for a printer address. 


i Prompt message 1 
| xx 4G06D SPECIFY PRINTER ADDRESS IN FORM CUU | 
| 


You may respond with 


° the unit address of that printer which you want to use for the dump output 
at stand-alone dump program execution time. 
° end/enter if you want to choose the printer address at execution time. 


Note: A stand-alone dump program generated under 370 mode which resides on a 
diskette or on cards cannot be used in E/mode and vice versa. 


If you do not specify a printer address, the generated stand-alone dump program 
will enter a wait state until the operator starts the printer device which is to 
be used to print the stand-alone dump. 

Dump Tape printed with DOSVSDMP 

Normally Info/Analysis is used to process and print dump tapes. In exceptional 
cases the use of the DOSVSDNP utility may be necessary, for example, if none of 


your dump sublibraries is big enough to hold the stand-alone dump. 


The output of a stand-alone dump taken on a central processor with ECPS:VSE can 
be printed by DOSVSDMP under a VSE system in 370 mode and vice versa. 


The printed output of the DOSVSDMP utility contains for both, DUMP command tape 
or stand-alone dump tape, the following: 


. Symptom record. 
: Unformatted dump data. 
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Sample DOSVSDMP Print Set-up 


// JOB DOSVSDMP 
/{ EXEC DOSVSDMP 


DOSVSDMP prompts you by messages at SYSLOG to define the operation 
you want to perform, with: 


-————-————__ Prompt message 
| xx 4G01D SELECT ONE OF THE FOLLOWING FUNCTIONS | 
Niudtege ed gee hh mee a Ae ata e aie iii Lee | 
1 CREATE STAND ALONE DUMP PROGRAM | 
2 PRINT DUMP TAPE | 
3 PRINT SDAID TAPE | 
R END DOSVSDMP PROCESSING | 

3 


oo 


Enter 2 to invoke DOSVSDMP print dump tape processing. 


The DOSVSDMP utility response is: i 
ce _ Prompt message ————_____,, ‘ 
| xx 4G02D SPECIFY THE TYPE OF THE DUMP | Ne 
[el eantnaSitanctines tasers: ebbie waciauacaran tole annghse tate latter ube eieeach | 
| 1 STAND ALONE DUMP ON TAPE | 
| 2 DUMP COMMAND ON TAPE | 
| R END DOSVSDMP PROCESSING | 
L 
(ENTER ONE OPTION ONLY) 
Enter 1 to print the stand-alone dump or 
enter 2 to print the DUMP command dump on SYSLST. 
The DOSVSDMP utility response is: 
[ Prompt message ———————————_, 
| xx 4GO04D SPECIFY INPUT TAPE IN THE FORM SYSNNN OR CUU | 
| ecSebeathatd dee tei orang arate habe he depo ait ats aad oe aa oe ee eee | 
t eee | 
Enter 280, for example, if the dump tape is mounted on the tape 
drive 280. 
The DOSVSDMP utility starts printing on the device at SYSLST if the 
tape contains a stand-alone dump. 
After print completion, control is returned to Job Control. 
If the dump tape contains a DUMP command dump : 
the DOSVSDMP utility responds with: MC 
th _-~Prompt message ——-—-—, 
| xx 4G30D SPECIFY FILENUMBER ON TAPE | 
| toe Soca dere ach lutea’, SMatvane ta dco cate “ies We by ahaa telson 
eS ae a a oN er AT ae ee ee eC or a ee ee 
Enter 2, for example, if the second file contains the DUMP command ; 
output you want to print. va 
Now the DOSVSDMP utility starts printing the DUMP command tape on \, 
SYSLST. es 
After print completion, control is returned to Job Control. 
a 
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DOSVSDMP Wait Codes 


| The following wait state codes appear in the address portion of the | 
| current PSW when the stand-alone dump program (DOSVSDMP) terminates. | 
| The codes are shown here as they would appear in the right half of | 
| the current PSW when displayed using the ALTER/DISPLAY function. | 


| Wait Codes | | 
| (Hex) | | 


| CE 00 00 | Successful completion of a stand-alone dump request. | 
| | | 
| CE 00 01 || An I/O error occured after a start I/O was issued for | 
| | the dump device. | 
| | | 
| CE 00 02 | The dump-output device is not operational. 

| | | 
| CE 00 04 | A channel error occured on the dump-output device. | 
| | | 
| CE 00 08 | A permanent I/O error occured on the dump-output de- | 
| | vice. The original error was retried and found to be | 
| | irrecoverable. When this code occurs, the stand-alone | 
| | dump program stores 24 bytes of sense information at | 
| | processor storage location 0. | 
| | | 
| CE 00 10 | An I/O error occured during error recovery processing. | 
| | This indicates an error other than that for which error| 
| | recovery is being performed. When this code occurs, the| 
| | stand-alone dump program stores 24 bytes of sense | 
| | information at processor storage location 0. 

| | | 
| CE 00 20 | End of tape. | 
| | | 
| CE 00 40 | An I/O error occured during the initial program load | 
| | of the stand-alone dump program. | 
| | | 
| CE 00 80 |] A machine check occured. | 
| | | 
| CE O01 00 | I/O error during IPL. | 
| | | 
| CE 02 00 | No page frame available during IPL. | 
| | | 
| CE 04 00 | A program check occured during IPL of the dump program. | 
| | 
| CE 08 00 | A program check occured during virtual storage dump | 
| | preparation. | 
| | | 
| CE 10 00 | A program check occured while dumping virtual storage. | 
| | | 
| CE 20 00 | A program check occured while shifting the dump program| 
| | (DMPPROG) to the storage limit. | 
| | | 
| CE 40 00 | A program check occured while creating the VSE control | 
| | block or HC message symptom record section 6 | 
| | (module IJBXDM8 or 9). | 
| | | 
| CE 80 00 | No E-mode page frames are available for shifting the | 
| | | 


dump program (DMPROG). 
Dh i 
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INFO/ANALYSIS 


Schematic Overview 


| a a a ara | are rea ie mae ME | 
| DUMP | | CANCEL | 
| Option | | Command | 
| | 
| SS SS Sey | 
fo | | | 
L__>| Common |< 
| | 
ea | Dump | 
| DUMP | | | 
| Command | | Library | 
ey mae | ie a | 
| SA-Dump | f Li — | | Dumps | 
| | | | | A 
|from tape | | | |to tape 
: | | 
| rc cates poy Ba 
L—__——> onload | dump management | offload 
| | | | 
| pa INFO Ls | 
| | | | 
| | ANALYSIS | | 
| Vv Vv as 
| | print/display analyze SA-Dump | | 
| | | 
| : ey | 
| A A | | 
| | | op fi | 
| Interactive | |Batch/ICcF | |Batch 
V | v | Vv 
f ae | | [rr (ga ee Se | { 7 
| | { | | | 
| ISPF Terminal | | | ICCF Terminal | | i Printer 
ie é 23 f { aj | 
| | 
kt a ee lee, set es }------+------ J--------- ee 
| V 
with a fi. > oe 
Interactive | I< >| POWER | 
User | fUI Terminal |. | list queue 
Interface L - 
~ IUI - | 
Vv 
€only with VSE/SP) a: 
| Printer [: 
C ‘ 
The Info/Analysis Execution Modes 
. ps Se 
[| BATCH } | INTERACTIVE| 
| MODE | | (ISPF) MODE | 
A Input/Output via: Input/Output via: 
« ICCF Terminal ¢  fSPF/ICCF Terminals 
B Input: You initiate Info/Analysis by 
« SYSIN/SYSLOG calling the ISPF start-up 
procedure. Enter the name of 
Output: the procedure on the ICCF 
SYSLST terminal command line. 
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Common DUMP Library SYSDUMP 


The library named SYSDUMP is used to store the various dump types for further 


processing. It contains one or more dump sublibraries. Each dump sublibrary 
should be assigned to one partition and may contain one or more dumps. 


SYSDUMP LIBRARY 


;—>| SYSDUMP.BG..... { <-—~ 

| | | 

Dump [—>| SYSDUMP.F1...., | | 

Sublibraries: | | ——____—~ ] | 

one per }-—>| SYSDUMP.F2..... | | 

Partition | | | 

(if created) }- >| ...... | | 

| | | 

i—>| ...... { | 

l J | 

| 

J] 

DUMP SUBLIBRARY FOR BG | 

f 1 1 | 

Dumps stored ;—>| SYSDUMP.BG.00000020 | | | 

in one Dump |-—>I SYSDUMP.BG.DUMP | t4 
Sublibrary ccm OM RE | | 
l i — 


Info/Analysis in Batch 
You may use Info/Analysis in batch mode in two ways: 
7 Line mode - from the operator console or ICCF console 


7 Reader mode - from the system input device or ICCF virtual reader 


In either case, you invoke Info/Analysis by submitting a series of job control 


statements (JCL) followed by control statements that request Info/Analysis 
functions. All output is routed to the SYSLST device or the ICCF virtual 
printer called the print area. The output includes the input control 


statements, the resuits of processing, and any messages issued by Info/Analysis. 


You may submit the job either in line mode by entering statements on the 
console, or in reader mode by submitting a job to the system input device. 


With JCL, you must specify any nonstandard system device assignments and 
preailocate and assign any files that you require other than the system 
libraries. A sample of the JCL for invocation is: 


f; JGB ANALYSIS 

| // ASSGN SYSLST,OOE 

| // ASSGN SYS016,252 "' DUMP MANAGEMENT FILE ” 
| // ASSGN SYSO017,252 " EXTERNAL ROUTINE FILE 
| // EXEC INFOANA , SIZE=400K 


(info/Analysis control statements) 


| 
' 
| /* 
|  /& 


Once the JCL has been processed, you are at the selection level in 


into;sAnalysis. ihe program reads for your control statements. An end of inout 


(/*) statement marks the end of these statements. To end your job, enter an 
Ot job (/&) statement. 
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Entering Control Statements 


The rules for entering the control statements that request Info/Analysis 
functions are: 


Each card or input line may contain only one control statement. 
A control statement may begin in any column. 


Control statements and their operands may be entered in uppercase or 
lowercase. 


Control statements must be entered in their complete form; no abbreviations 
are allowed. 


Each word in a control statement must be a contiguous string of characters. 
Some blanks, at least one, must appear between the words in a statement. 
A blank followed by an asterisk (' *') signifies the start of a comment. If 


the first non-blank character in any control statement is an asterisk, the 
entire statement is treated as a comment. 


If you enter an invalid control statement in reader mode, the remaining control 
statements in the job are flushed and the session is canceled. The output 
indicates the erroneous statement. 

In line mode, invalid input causes Info/Analysis to flush only the control 
statement. You may then reenter the statement correctly. 


Ending the Info/Analysis Job 


You end an Info/Analysis batch job by submitting the SELECT END statement while 
you are at the selection level. If you wish to end your session at the function 
level, enter RETURN followed by SELECT END. 


SELECT END should be followed by an end-of-input statement (/*) and an 
end-of-job statement (/&). If you enter an end-of-input or end-of-job statement 
at any point in the sequence, the job is canceled at that point. 


Command Summary 


This overview contains a summary of the batch control statements for 
Info/Analysis. The statements are presented in a functional order. 


Function Selection Level Commands: 


5- 


DUMP NAME dumpname 
The DUMP NAME command specifies the dump to be analyzed, onloaded, 
or offloaded. 


If the dump name is not currently in the list of known dumps, it is 
added in 'TO BE ONLOADED' status. 

This dump name is required for any subsequent action that requires an 
online dump or a dump name. 


SELECT DUMP MANAGEMENT 
Select this function to manage the list of dumps known to 
Info/Analysis. 


SELECT DUMP SYMPTOMS ; 
Select this function to print the symptom record of the dump. 


SELECT DUMP VIEWING 
Select this function to print the contents of the dump records or 
invoke an analysis routine. 


44 IBM VSE/Advanced Functions Handbook 


Licensed Material - Property of IBM © Copyright IBM Corp. 1985 


SELECT DUMP OFFLOAD 
Select this function to offload a dump to a tape for storage or 
backup. 


SELECT DUMP ONLOAD 
Select this function to onload a dump to the dump sub-library from 
a tape. 


SELECT END 


Select this function to cause termination of Info/Analysis. 


Dump Management Commands: 


DUMP NAME dumpname 
The DUMP NAME command specifies the dump to be analyzed, onloaded, 
or offloaded. 


If the dump name is not currently in the list of known dumps, it is 
added in 'TO BE ONLOADED' status. 

This dump name is required for any subsequent action that requires an 
online dump or a dump name. 


UTILITY 
The UTILITY command provides proper initialization of a new or 
re-allocated dump management file. 


DELETE 
This command causes the currently active dump to be deleted form the 
dump sub-library and the list of known dumps. 


PRINT DATA 
The PRINT DATA command causes the list of known dumps to be printed. 


Dump Symptoms Commands: 


PRINT DATA 
The PRINT DATA command causes the list of known dumps to be printed. 


Dump Viewing Commands: 


PRINT from-address to-address 
This format causes dump data to be printed for the specified 
address range. 


PRINT from-address END 
This format causes dump data to be printed from the address specified 
to the end of the dump. 


PRINT from-address FOR length 
This format causes dump data to be printed from the address specified 
for the length specified. 


PRINT FORMAT 
This format causes portions of dump data to be printed according to 
information in the symptom record. 


CALL routine-name 
The CALL command initiates the execution of the specified analysis 
routine. 


Dump Offload Commands: 


VOLID volume-ID 
The VOLID command specifies the 6 digit volume ID of the output tape. 


BYPASS 


This command bypasses the physical offloading of a dump if a valid 
copy already exists. 
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ERASE YES/NO 

This command specifies if the dump is to be erased from the 
sub-library after completion of the offload function. The entry wiil 
remain in the list of known dumps until it is deleted. 


Dump Onload Commands: 


VOLID volume-iD 
The VOLID command specifies the 6 digit volume ID of the input tape. 


FILE file-sequence-number LAST 

The FILE command specifies the sequence number of the file on the 

tape. The LAST operand is optional and indicates that this file is 
the last file to be loaded from this tape. Specifying LAST causes 

the tape drive to be de-allocated. 


Commands valid for all Functions: 


HELP 
A copy of this listing is printed, 


RETURN 


This command causes the termination of the current function. 


Control Statement Sequence Examples 


1. SELECT DUMP MANAGEMENT 

PRINT DATA 

RETURN 
2. DUMP NAME SYSDUMP.F6.00000007 
3. SELECT DUMP SYMPTOMS 


PRINT DATA 
RETURN 
4. SELECT DUMP VIEWING 

PRINT 0 20880 * PRINT SUPERVISOR 

PRINT C80000 END %* PRINT SVA 

PRINT 126000 FOR 1800 * PRINT JTB TABLE 

PRINT FORMAT * PRINT ALL FORMATTED 
* DATA 

RETURN 


5. SELECT DUMP OFFLOAD 


| 

| 

| 

| 

| 

| 

| 

| 

| * DATA 
| 

| 

| 

| 

| VOLID T02512 
| 

| 


RETURN 
6. SELECT END 
ee 


The example contains the following operations: 


1. Select the Dump Management function and request the printing of the list of 
managed dumps. 


2. On the selection level, specify SYSDUMP.F6é.00000007 as the current dump. 


3. Use the Dump Symptoms function to print the dump symptoms that are contained 
in the symptom record. 


4. Use the Dump Viewing function to print selective areas ot the dump. ine 
assumed areas are written in the comments on each statement. 


5. Use Bump Offload to offload SYSDUMP.F6.00000007 to the tape with VOLID 
T02512. 


6. End vour Info/Analvsis session. 
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| 1. DUMP NAME SYSDUMP.F4.DUMP0003 
| 2. SELECT DUMP ONLOAD 
| VOLID T300U1 
| FILE 003 
| RETURN 
{| 3. SELECT DUMP VIEWING 
| CALL IJBXDBUG 
| RETURN 
| DUMP NAME SYSDUMP.F5 .00000002 
SELECT DUMP OFFLOAD 
| VOLID T03417 
| BYPASS 
| RETURN 
| 6. DUMP NAME SYSDUMP.F6.DUMPO001 
7. SELECT DUMP ONLOAD 
VOLID T300U1 
FILE 1 LAST 
RETURN 
8. SELECT END 


me 


The example contains the following operations: 


is 


2. 


8. 


On the selection level, specify SYSDUMP.F4.DUMP0003 as the current dump. 


Use Dump Onload to load the current dump (file 3 on tape T300U1) into the a 
dump sublibrary so that you can work with it. 


Use Dump Viewing to call routine IJBXDBUG to analyze the stand-alone dump. 
Results of the routine are printed. 


On the selection level, specify SYSDUMP.F5.00000002 as the current dump. 

Use Dump Offload to offload SYSDUMP.F5.00000002, specifying the output 
volume and choosing to bypass the write operation because a valid copy of 
the dump already exists on tape. (The information concerning this dump in 
the dump management file will be kept.) 

On the selection level, specify SYSDUMP.F6.DUMP0001 as the current dump. 

Use Dump Onload to load the current dump (file 1 on tape T300U1) into a dump 
sublibrary, specifying LAST because it is the last dump to be onloaded from 
the tape. 


End vour Info/Analvsis session. 


Note: All of the functions available to the batch user are available to the 
interactive user. However, the dump viewing function is more flexible in the 
interactive environment. 
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info/Analysis Interactive ‘ 


Most interactions in Info/Analysis with ISPF take place through panels and 
responses to those panels. However, a set of commands is provided described in 
following overview: 


Command Summary 
This is a summary of the interactive commands for Info/Analysis. The "Valid 


Functions" column represents the functions during which the commands may be 
entered as follows: 


eos 


M - Dump Management 
S  - Dump Symptoms 

Vs - Dump Viewing 
OF - Dump Offload 
ON - Dump Onload 
SEL - selection level 
T - Tutorial 
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© Cop 


level or panel from 
which tutorial was 
called 


yright IBM Corp. 1985 


| COMMAND | DESCRIPTION | VALID FUNCTIONS | 
| | |M|S|V|OF|ON/SEL|T| 
| ' 7 | PobeP te GRD: ao 
[DOWN | ‘amount’ | | Scroll the specified [X]xX]x] | | | 
uP | "MAK ¢ | | or default value in | | | 
| | "HALF ° | | the specified fis ee ie ee a Co 
| | ' PAGE | | direction | | | | | | a 
CSR 
| a 4 | ae et ee ee | 
| | Oe ee ae ee ee 
| END | End function or Ix[x[x] x] x] x [x 
leon meee 
| Find | Locate data in [xX[xXIX] | [ | 
| {'hexdata’ } | display hs oe ee ee es 
| {chardata } | ee a a ie ee (i 
| | 4 Pde oe fe pd 
| [from—addr ie ap i ae ae eae a 
| [from—addr to-addr } | | defines Le eo oe | 
| [from-addr END ] | | search Pups oe 
| {from—addr FOR length] | | range | | | | | | | | 
{INCRement incr ] 
| i Peet bt bl 
| HELP | Display help [X{xX|x] Xx] x] x [x| 
| | TRE FeO Pa eam | 
|Log [ON } | Record session {x}x]x| xX] x] x | 
[OFF ] | interactions Vel te uke lid 
| | Pee ell tl ae St 
| MASK | Overlay dump data | | Xf | | | | 
| [from-addr to-addr ] | led dod | | 
pogroms FOR length] | | | | | | 
| oe 
he | Display messages ae *| x X | | 
| PRint | Print data ak oe ties A | Le 
| [FORMAT Vt es ee ee 
| [DATA T | IX]x| | | ] | | 
| | 4 Re We eet ae es Fa 
| [fxrom—addr to~addr } | | defines the address it ix} |] | | 
| [from-addr END ] | | range of dump data | | dx} | | 
| [from—addr : ] | | to be printed | | A | | ' 
[from—addr FOR length] X 
lye Poe an ae ee es (O 
| | lath Lh. I Heel 
| RETURN | Return to selection IxIx{[x{ | | |X| 
| | be Misahi Fi AP sah 
| | ede a 
| | Sat ap a ee ee 


You enter a command by typing it after the arrow (===>) on the entry line and 
pressing the ENTER key, or by pressing a PF key if the command is represented by 
one. 


Note: For a detailed description of the commands use the 'HELP' command. 
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Function Selection Panel 
The function selection panel shown below is displayed when you invoke 


Info/Analysis. It is the focal point for all Info/Analysis activities. 


To invoke Info/Analysis, enter the name of the Info/Analysis 
start-up command procedure. 


{ | 
{  BLNFSOO1 INFO/ANALYSIS FUNCTION SELECTION | 
| ===> | 
| | 
| DUMP NAME === i 
| | 
{| Type the dump name in the field above, or select a function | 
| by typing its number, and press ENTER: | 
| { 
| | 
| 1 DUMP MANAGEMENT Select, add, or delete a dump | 
1 i 
| 2 DUMP SYMPTOMS Display dump symptoms | 
i i 
| 3 DUMP VIEWING Examine a dump i 
t { 
| 4 DUMP OFFLOAD Copy a dump to tape | 
| \ 
| 5 DUMP ONLOAD Load a dump from tape| | 
| | 
|  T TUTORIAL Learn how to use Info/Analysis 

\ { 
{| X EXIT End the Info/Analysis session | 
| | 
i | 
| | 
t. pia | 
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The Dump Management Panel 


After this task is completed and at any other time that you select Dump 
Management during a session, Info/Analysis displays the dump management panel, 
which lists all of the dumps identified in the dump management file. The dumps 
are listed in reverse chronological order by date and time stamp. That is, the 
most recent dump is at the top of the list. 


—-—--— 
| BLNDMOO1 DUMP MANAGEMENT 

| mace Ree SCROLL ===> PAGE 

| 

| DUMP NAME ===> 

| | 
| To select a dump, type 's' before its name or type its name above. 
| To add a dump, type its name above. 

| To delete a dump, type 'd' before its name. | 
Press ENTER: 


| DUMP NAME ONLINE DATE/TIME TAKEN VOLID | 
SYSDUMP.F8 .P9004016 TO BE ONLOADED 

| SYSDUMP.F4.P6093403 Y 84/04/12 08:44:51 | 

| SYSDUMP. F6.S0033119 Y 84/04/12 08:11:06 | 
SYSDUMP.F4.S0015837 Y 84/03/28 22:05:16 T02818 

| SYSDUMP.F4.S0007812 84/03/17 01:31:21 T42901 | 
SYSDUMP.F5.00003132 84/03/08 15:38:42 T03496 | 


Dump Viewing Selection 


This panel is the gateway to the Dump Viewing functions. On the entry line of 
the panel, you may enter the selection number of the function you wish to 
perform. 


BLNDVSO1 DUMP VIEWING SELECTION 


oo _ 
DUMP NAME .... SYSDUMP.F4.P6093403 


To select a function, type its number and press ENTER: | 


1 DUMP DISPLAY OPTIONS Examine or change dump display options 


2 DUMP DISPLAY Examine dump data 
3 ANALYSIS SUMMARY Examine text, control block locations, | 
control block linkages, etc. 
4 ANALYSIS ROUTINES Select an analysis routine for execution 
| 
| See eee eee 
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MAINTAIN SYSTEM HISTORY PROGRAM (MSHP) 


MSHP, IBM's installation and service tool for VSE Systems, is a part of 
VSE/Advanced Functions. Any installation or service job using the program is to 
be run in a partition of 640K bytes or larger; this includes MSHP's partition 
GETVIS requirement of up to 92K bytes. 


MSHP invokes, and supplies input to, various other system programs to perform 
its installation and service functions. These programs - such as the linkage 
editor and the librarian - run in the same partition as MSHP. They return 
control to MSHP when their function is complete. 


MSHP records installation and service activities done under its control ina 
file on disk. This file, the ‘System History File’, is used by MSHP for 
maintaining system integrity. It is therefore essential that the file reflects 
the system's current change level at all time. 


During installation and service of program products, certain functions of MSHP 
use an auxiliary history file, normally as a work file. 


The System History File 


The file is maintained under the file name IJSYSHF. To access the file, MSHP 
uses the IBM set default logical unit SYSREC; in other words, the same volume 
that contains the system's recorder file. However you can use any programmer 
logical unit to refer to the file if you place it on a volume other than that of 
SYSREC. 


The file should be permanently defined by a permanent entry in the system 
standard label area: 


// DLBL IJSYSHF, 'A5666301.SYSTEM.HISTORY.FILE' ,99/365 
// EXTENT SYSREC,vol-id,1,0,numberl,number2 


You may also define the file by using the MSHP DEFINE statement. If you use 
this approach and request several MSHP functions within one run, your DEFINE 
statement must follow the first MSHP function request. This definition is valid 
only until the end of this MSHP run. 


The Auxiliary History File 


MSHP needs this file for certain functions during the installation of a program 
product or of service changes. 


The file, which MSHP uses primarily as a work file, is maintained on disk under 
the file name IJSYSO2. Normally, it is created on the volume assigned to the 
logical unit SYS002, but you can use any other programmer logical unit if this 
is desirable. If you use a different programmer logical unit, this logical unit 
must be assigned before you submit the EXEC statement invoking MSHP. 

MSHP Control Statements 

MSHP has two types of control statements: functional control and detail control. 
e Functional control statements define the desired MSHP functions. 

* Detail control statements provide descriptive data about the requested 


function. Detail control statements, if required for a function, must always 
follow immediately the applicable function control statement. 
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RULES FOR WRITING MSHP CONTROL STATEMENTS 


With one EXEC MSHP, any number of function control statements can be 
specified. 

The function control statement you use determines which detail control 
statement(s) must or may follow. 

If statements must be submitted in a specific sequence, this is noted in the 
description for the statement(s). 

Detail control statements can follow only a function control statement or 
another detail control statement. 

MSHP control statements are of free form. The statement's operation code may 
begin in any input character position. 

An input line for MSHP control statements represents the first 72 characters 
of a card image input record or 120 characters for console input. 

Operation codes and operand keywords may be abbreviated. In the statement 
descriptions, permissible minimum abbreviations are shown as uppercase 
character strings, followed by the remainder of the keyword in lowercase. 
For example, INSTall may be coded as INST, INSTALL, or anything within these 
limits. 

A value contained within brackets [....] may be included or omitted, 
depending on the requirements of the program. 

Two or more values contained within brackets and separated by an | sign 
represent alternatives, one (and only one) of which may be chosen. 

For Example: 


[IRRevokable|REVokable] 


If you specify nothing, MSHP assumes the underlined option as default. 
Options contained within braces ....} and separated by an | sign represent 
alternatives, one of which must be chosen. 

For Example: 


PRODuct | SYSres} 


The operands of a statement are separated from one another by: 

— One or more blanks 

= A comment (which is text within /* and */)} 

- A comma (which may be surrounded by one or more blanks or comments) 

An all-comment input line is allowed; however, not beginning in column 1. 
Words given in all lowercase letters represent information that must be 
supplied by the user. 

The equal sign (=), the plus sign (+), the colon (:), and the single quotes 
(' ') must be coded as shown; they may be surrounded by one or more blanks, 
except for the (+) sign, which must not be preceded or followed by a blank. 
An ellipsis (a series of three periods) indicates that a list of up to 100 
items (such as PTF numbers) may be specified within parentheses. For 
Example: 


(UD27484,UD13528,...) 


However, a single item does not have to be enclosed in parentheses. 

The individual values in a list can be separated from each other by: 

-— One or more blanks : 

— A comment (text within /* and */) 

— A comma (which may be surrounded by one or more blanks or comments) 
Commas and blanks as separators may be intermixed in a given list. 

A control statement (function or detail) ends with the end of the input 
line, unless it is explicitly continued by means of a dash (-), followed by 
at least one blank. It may also end with a semicolon. 
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The continuation dash must also be preceded by at least one blank, except 
after a 

- Comma 

= Parenthesis 

~ Equal sign 

~ Comment end 

-— Quoted string end 

For function control statements, not more than six continuation lines may be 
specified. 


A pair of values connected by a colon, as in 
APPLY 5666-301-01:UD12345 


cannot be broken by a line end; nor can a keyword itself, a number, or a 
quoted or unquoted string be continued on a subsequent line. 

. More than one control statement may be coded on the same line. 
In this case, preceding statements on the line have to be terminated by a 
semicolon (;). 
For Example: 


PTF UDO000Q1; PTF UD00002 
¢ From the console, MSHP control statements may be entered in uppercase or in 
lowercase. 
e An MSHP statement entered from the console may be canceled by entering two 
question marks (27). 
SYSIN Service Tape Format 
From VSE/SP 2.1 (VSE/AF 2.1} up, the format of the distribution media for 
preventive and corrective PTFs will change to a common SYSIN format. This 
'SYSIN' service tape format replaces the old ‘PUT Tape' format. 
The format of the service tape is as follows: 
¢ FILE 1: History file or null file 


6 FILE 2 : Preventive service document 


bd FILE 


we 


: Not used by MSHP 

° FILE 4 : EXCLUDE-List or null file 

° FILLE 5 : Coverletters or null ,file 

* FILE 6 : FIFs 

° FILE 7 : Not used by MSHP 

: FILE 8 : Not used by MSHP 

The files which are not used by MSHP are present for compatibility reasons. 


The ‘old' format PTF Tapes are not longer valid, because when PTFs will be 
installed, MSHP skips automatically to FILE 6. 
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Identification 


co-—ooo ee + ++ -- <es - Or"'—=7 


Bon a ee a a an Pd 
| Product Code }——————,__ | Level | 
r 1 V Vv 
| Component~—ID | > 5666-301—01—-H07 
| | 
= [ 
| 
j 


at. cere Ul | 
| Product—ID | | 
ee | | 
| vv 
L______________-> _ 301H07 


[petro Ne ee ee fe 


Definitions 


component: 


level: 


product: 


The term ‘component’ stands for the component identification number 
of a component, for example: 


5666-301-01 


A component may occur in more than one product, in which case it is 
further qualified by a ‘level’ indication. 


Note: When installing PTFs, the level is required toa. 
Denotes the level of a component. It is a string of three alphameric 
characters which identifies the component uniquely if, for example, 
the component is shared by several different products. 
To indicate that a component belongs to a certain product. the level 
number of that product is appended (with a -) to the component's 
name. 
For example: 

5666-301-01-H0O7 
identifies component 5666-301-01 at level H07. 


The term ‘product’ stands for the 6-character product identification 
number of a product. for example: 


301HO7 


where the first three characters are derived from the product's 
program number (for example, 301 for VSE/Advanced Functions), and 
the remaining characters are the level number of the product, 
formerly known as feature number or release number. 


This level number is also the level number of anv comvonentf(s) 
belonging to the product. 
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MSHP JOB EXAMPLES os 


Den ee ey ee ee pe Tt 
| Restore System History | 
Lea ee 


// JOB RESTORE SYSTEM HISTORY 
// ASSGN SYS006,cuu 

// MTC REW,SYS006 

// MIC FSF,SYS006,2 

// EXEC MSHP 

RESTORE HIST SYS 

/ * 

/& 


aa 


Note: 

SYS006 (IJSYS06) - Tape drive on which the distribution tape is mounted. 
MTC commands are used to position the distribution tape to the beginning if 
of the system history file. 


[ae a a Pn ee eee = eed 
| Personalize the System History | 
eo a ee 


// JOB PERSONAL SYSTEM HISTORY 

// EXEC MSHP 

PERSONALIZE ‘customer name’ - 
ADDR='location’ - 
PHONE='extension' - 
PROGR='programmer name’ - 
ENV='environment' 

/ * 

/& 


Note: 

"customer name' may be up to 20 characters. 

"location' is the address not longer than 45 characters. 

‘extension’ is the telephone number up to 17 characters. 
"programmer name' may be up to 24 characters. 

‘environment’ is system related information. e.g. The software with 
the component level. (up to 62 characters.) 


(— a eee 
| Install SYSRES from Tape (Install New System) | 
{EERE re a a eect NY A oe 


// JOB INSTALL NEW SYSTEM U 
// ASSGN SYS006,cuu Se 
// ASSGN SYS007,cuu 
// ASSGN SYS008,cuu 
// DLBL IJSYSR1, 'A5666301.PRODUCTION. LIBRARY' ,99/365 
// EXTENT ,SYSRES,1,0,numberl,number2 
// DLBL GENLIB, 'A5666301.GENERATION. LIBRARY’ 
// EXTENT ,WRKFL1,,,0,1700 
// EXEC LIBR . cs 
DEFINE LIB=IJSYSR1 fi 
DEFINE LIB=GENLIB ; 
/k ca 
// EXEC MSHP 
INSTALL SYSRES FROMTAPE ID=301H07 - 

PRODUCTION INTO=IJSYSR1 - 

GENERATION INTO=GENLIB 
/ ve 
/& 


Note: f 
SYSO006 (IJSYS06) - Tape drive on which the distribution tape is mounted. Xt 
SYS007 (IJSYSO7) - New SYSRES (Production Library) device os 
SYS008 (IJSYSO8) - New GENERATION library device 
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(ewer ca, 0 co ee de ee I tee 
| Tailor a Supervisor (with Generation Feature) | 
a es] 


// JOB $$A$SUP1 
// ASSGN SYS001,cuu 
// ASSGN SYS002,cuun 
// ASSGN SYS003,cuu 
// ASSGN SYS004,cuu 
// ASSGN SYSLNK, cuu 
// ASSGN SYSPCH,IGN 
// OPTION CATAL 
// EXEC MSHP 
TAILOR 5666-301-06-HO7 PHASE=$$ASSUP1 KEEPDATA 
RESOLVES 'SUPERVISOR 1 GENERATION’ 
EXECUTE (ASSEMBLY LNKEDT) XREF 
TITLE 'VSE SUPERVISOR SOURCE CODE FOR $SA$SUP1' 


SUPVR ID=1, 
MICR=1419, 
FOPT DASDSHR=YES, 
TTIME=BG, 
IOTAB IODEV=254, 
NPGR=600 
END 
/$ 
/* 
/& 


KEEPDATA, an optional specification, causes the source code to be 
stored in the system's history file. MSHP uses that code if retailoring 
is to be done later on. 


Note: 

SYSOO1 (IJSYSO1) used for Assembler and Linkage Editor 
SYSO002 (IJSYS02)} - used for Assembler 

SYS003 (IJSYSO3) - used for Assembler 

SYS004 (IJSYS04) used for MSHP 

SYSLNK (CIJSYSLN) used for Linkage Editor 


a ee 
| Retailor a Supervisor (with Generation Feature) | 
[cc NP I a pa ee ee ee | 


// JOB $$ASSUP1 

// ASSGN SYSO01,cuu 

// ASSGN SYS002,cuu 

// ASSGN SYS003,cuu 

// ASSGN SYS004,cuu 

// ASSGN SYSLNK,cuu 

// ASSGN SYSPCH, IGN 

// OPTION CATAL 

// EXEC MSHP 

TAILOR 5666-301-06-HO7 PHASE=$$A$SUP1 KEEPDATA 


The options for the generation macros will be taken from the system's 
history file (from a previous tailor job). 


Note: 

SYSOO1 (IJSYSO1) - used for Assembler and Linkage Editor 
SYS002 (IJSYS02) used for Assembler 

SYSO03 (IJSYS03) - used for Assembler 

SYSO04 (IJSYS04) used for MSHP 

SYSLNK (IJSYSLN) - used for Linkage Editor 
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F 7 
| Install a Program Product | 
: os 


/{ JOB INSTALL PROGRAM PRODUCT 

“Tf ASSGN SYS006., cun 

/f OPTION. STDLABEL 

// DEBL PRPNLIB, "PROGRAM. LIBRARY. PRODUCT’ 

/f EXTENT ,PRPLB1,,,1, 1899 

// DLBL PRGNLIB, 'PROGRAM. LIBRARY .GENER‘ 

// EXTENT ,PRPLB2,,,1,1899 

// OPTION USRLABEL 

// LIBR 

DEFINE LIB=PRPNLIB 

DEFINE. LIB=PRGNLIB 

/* 

/f EXEC MSHP 

INSTALL PRODUCT FROMTAPE ID=tapefile-id - 
PRODUCTION INTO=PRPNLIB.SLIB1 - 
GENERATION INTO=PRGNLIB.SLIB2 

RETRACE PRODUCT 

/ * 

/& 


Note: 
SYS006 (¢IJS¥SO06) - Tape drive on which the distribution tape is mounted. 


Pires 
| Backup 4 Program Product | 
a 


// JOB BACKUP PROGRAM PRODUCT 
//{ &SSGN SYS006,cuu 

// EXEC MSHP 

BACKUP PRODUCT=product-id ~ 


ID=tape-id - 
PRODUCTION 
[* 
/& 
Note: 


SYSO006 (IJSYSO06) - Tape drive on which the output tape is mounted. 


| List Service Information | 
Se aes Pee eed 


// JOB LIST SERVICE INFORMATION 

/{ ASSGN SYSO06.cuu 

// EXEC MSHP 

LIST SERVICE TAPE - 

DOCUMENT COVER SEPARATE 

(PTF=UDnnnrin,UDnnnnn,...). - optional if only specified PTFs should 
be printed. If this statement is omitted, 
all PTFs will be printed. 

} * 

/& 


Note: 
SYS006 (IJSYSO6) - Tape drive on which the service tape is mounted. 
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f tae | 
| Install Service | 
fi 


// JOB INSTALL SERVICE 
// ASSGN SYSOO2.cuu 
/{ ASSGN SYS006,cuu 
/? EXEC MSHP 
INSTALL SERVICE RESTART - 
TAPES=2 
INCLUDE PTF=(UDnnann,UDnannn,...} 
DEFINE HISTORY AUX EXT=numberl:number2 UNIT=SYS002 
/* 
/& 


Note: 
SYS002 (IJSYSQ2} - Disk drive on which the aux history is located. 
SY¥S006 (IJS¥S06} - Tape drive on which the service tape is mounted. 


if : 1 
| Restart PTF Installation | 
L J 


The installation of PTFs frequently requires modules to be link-edited 
into phases. Before this link-editing under MSHP control starts, MSHP 
takes a checkpoint. Should this link-editing fail, then MSHP terminates 
PTF installation, but allows you to set up the install job again at the 
recorded checkpoint. To restart the installation process at this check- 
point, submit a job similar to the one shown below: 


// JOB INSTALL SERVICE 
// EXEC MSHP 

INSTALL SERVICE RESTART 
/* 


fk 


Note: 
For a restart, MSHP needs no input other than the INSTALL statement 
as shown in the above sample job. 


| Install a Backout PTF | 
t ! 


// JOB INSTALL BACKOUT PTF 
// ASSGN SYS006,cuu 

// EXEC MSHP 

INSTALL BACKOUT 

INCLUDE PTF=UD12345 

/ we 


me er Se MSHP generated - - - - - - - 
: // OPTION CATAL : 
// EXEC MSHP 
REVOKE 5666-SCI-01-HO7 : UD12345 
DATA 


Note: 
SYSO006 (IJSYSO6) =< Tape drive on which the backout tape is mounted. 
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| Correct a Phase | 
[a es ey 


// JOB CORRECT PHASE 

// OPTION CATAL 

// EXEC MSHP 

CORRECT 5666-273-01-A45 : DY21001 
AFFECTS PHASES=IPWS$SOT EXPAND=100 
ALTER FO 9200BOF8 :92F180F8 

ALTER 6FA 00000000:47000426 
RESOLVES 'ERROR ON TAPE OPEN' 

/* 

/& 


SSS 
| Remove the Fix | 
ar ee eee ES | 


// JOB UNDO FIX 

// OPTION CATAL 

// EXEC MSHP 

UNDO 5666-273-01-A45 : DY21001 
/ * 

/é& 


I) Scncpy hs ewe yen yt 
| Correct a Module | 
| een ee ee eee | 


// JOB CORRECT RELOCATABLE MODULE 
// OPTION CATAL 

// EXEC MSHP 

CORRECT 5666-301-02-HO7 : DY19227 
AFFECTS MODULE=IJWCCD2 ESDID=1 
ALTER 1048 47FOF000:47FOF800 
RESOLVES ‘CLEAR DISK ERROR' 
INVOLVES LINK = IJWCCD 

/* 

/& 


ly he a er ee 
| Correct a Source Macro | 
ee TY 


// JOB CORRECT SOURCE MACRO 
// OPTION CATAL 
// EXEC MSHP 
CORRECT 5666-301-02-HO7 : DY17291 
AFFECTS MACROS=CDLOAD 
VERIFY 007100 
AIF  (K'&PHASE LE 8).FOUR 
INSERT 7100 


AGO = STOP 
/§$ 
INSERT 9100 

STOP ANOP 
/$ 


CORRECT 5666-301-02-HO7 : DY18456 
AFFECTS MACROS=SETL 
REPLACE : 300000+21 
RETURN ANOP 
/$§ 
AFFECTS MACROS=SECHECK 
DELETE 071000 : 072000 
/* 
/& 
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| Correct Unedited Source Macro {| 
et ee een ae ed Py 


// JOB CORRECT UNEDITED SOURCE MACRO 
// OPTION CATAL 

// EXEC MSHP 

CORRECT 5746-XX-100-H57 : PP73336 
AFFECTS MACROS=DLZCKOPT TYPE=A 
DELETE : 000400 


INSERT 450 

LCLB@B(9) ,@NGP 
@B(9) SETB (@PIO(@P)) 
/§ 
/* 
/& 


(he ey eee eg 
| Archive Update | 
ee ee een | 


// JOB ARCHIVE UPDATE 

// EXEC MSHP 

ARCHIVE 5666-301-08-HO7 APAR=LF00003 
/* 

/& 
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MSHP FUNCTION CONTROL STATEMENTS SUMMARY 


foe ae ee Ne ee ea te eg — ape ee Sy a al 
{ Function | t 
} vontror  } rurpose i 


| statement | 
| APply I Install a PTF and record it in the system history file. i 
| ARChive | Enter, into the history file, information relating to | 
| | products, components, PTFs, and local or APAR fixes. | 
t BACKup | Copy an auxiliary or system history file from disk ta | 


| | magnetic tape. Produce a backup copy of a product. | 
| CUPy i Copy a history file from disk to disk. | 
| CORrect | Install a local or APAR fix. | 
| CReate | Pre-format a history file and reserve space for the f 
i PEKsonaiize function (see betow}. i 


[J] a 


Paracee cetera 


f DUMP | Produce a formatted printout of a system or auxiliary I 
f | history file. | 
| INCorpo— | Install a component distributed in SYSIN format. i 
| trate } | 
i] 1 ' 
| INSTalt | Install a system (SYsres} or product (PRoduct). | 
| SYsres/ | | 
{ 1 ! 
i 


| IN>iaii | Apply preventive ana corrective service trom the i 
| oOhrvices; | Service tape losrvice) or a backout tape (BAckout). i 
| BAckout é | 
. i i 
| Lisi j Write information from a service tape onto SYSLST. i 
t r 1 
| Lookup | Display, on SYSLOG, selected information from the | 
i | SYSteM History riie. i 
5 t t 
| MERge | Put entries of a history file into another history file. | 
PERsonai— | Identify a system history tiie in relation to 4 | 
| ize | specific user. | 
aia eceenenaee een 

| REMove | Erase entries from the system history file. | 
t t ' 


ko a alle ey ee 


$$$} 
| RESIdence | Specify names of sublibraries in which a product resides |. 


Wa-rg pte ee eg a ee oe ee oe A mgs ee ei 
| Restore a compiete shipment package or a history file | 
} trom magnetic tape to disk. | 
1 ! 


asc ae ~ 4 
Print information from the system history file on SYSLST| 


KEVOKe | Kestore an operational system to the status existing i 

i | prior to a PTF installation. i 
| = — = 
SELect | Select individual tailor jobs from the generation file | 

i i (fox retailuring). | 
! ! 4 
TAILor | Identify and initiate the generation (or regeneration) | 

| of a library member. | 

: : — 
| UNdo | Remove an initiated local or APAR fix to re-establish [| 
| the previous library status. | 

aN aEaG SETS 
*Note: The capitalized part of the statement is the minimum | 
allowed abbreviation. | 

i 
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MSHP DETAIL CONTROL STATEMENTS SUMMARY 


i 
vetail 
Control \ Application 1 

, ptatement*; ! 

; T 1 

| AFFects | Library members that are affected by a PTF or local fix. | 

r t : 

| ALter | Specify text modifications for library members. 

F 

; COMPAtible} Products that are compatible with the shipped product. 

+ + 

| COMPRises | Identify the component, phases, modules, and/or macras 

: } that comprise a product, and enter the information in | 

i ; the history file. 

i i i} 

| DATA Delimit input to the LIBR and LNKEDT programs. 

fs i 
DEFine Create label/extent definitions for the history file. } 

t 

| DBLete | Delete lines from source book when appiying a iocai fix.| 

a 

| KXCLude kxciude one or more products, components, or PTFs | 

trom a service appiication. i 

| | 1 

; bAbLUtTe Lall one or more system programs (for example, I 

i assembler} required ror ta1ioring. | 
GLNerate specity a phase, module, or macro for regeneration. | 

-——— Se SSS SSS SoS 

1 1NULUude } inciude one or more products, components, or FiFs i 


\ 


in a service application. | 


genet ee eee ee ee aes ee ee Se en Ss ee 


INF Luences! 


| ldentity those generated phases, modules, or macros i 
tnat are atrected bv a PIF or locai/APAR fix and that i 
| have to be regenerated if the fix is applied. { 
| lNsert Insert lines in a source book when applying a local fix.| 
i { 1 
| LNVolves j Bxplicitly request Llink-editing wnen instaiiing a | 
| product or applying service. 
; OR Delimit a set of requirements (initiated with the | 
R&EQuires statement) and test the requirements. | 
i" i 1 
| PTF | List the PTFs whose cover letters are to be printed. 
| : 
| REPlace {| Delimit begin and end of replacement lines for local or | 
' | AVAK TixeS; Initiate tne repltacement or tne source text.| 
t + 1 
i KEQuires Specity the requirements tor successtully installing | 
: : a shipment package or applying service. 
: ~- 4 
. KbSoives ; Associate a comment with a PIF, a product, an APAK | 
1 | Or a local fix, Or a generated member. 
KL>iart Indicates, ror macro upaates, tnat a new sequence i 
| number series Starts atter the specified statement. | 
"i 
" puan ' Scan a phase for a specified string, or display ioe i 
bytes of a phase. | 
2 ~ 
SUrersedes: Kecord the PIFs that are superseded by a given PIF. 
: | 


1 


| 


1 


VERify 


Specify where a verification is to be made for a local 
or APAR fix correction. 


aliowed abbreviation. 


' 
t 
! 
i 
“Note: The capitalized part of the statement is the minimum | 
F 
i 
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FUNCTION CONTROL STATEMENTS 


(ee ee ee eee oe ae he ee ee 
| Operation | Operands | 
ee en 
| APply | component[—level] : ptf—-number | 

| [IRRevokable|REVokable] [INDirect] | 


The APPLY statement is used to install a single PTF to your system and to record 
the installation in the system history file. 


Logical Unit Assignments 

Required: 

SYSO01 Work file used by MSHP. 

SYSLNK Linkage editor input file; needed to catalog phases supplied by IBM in 


object format. 
SYSLST System printer. 


Optional: 

SYSPCH Needed if a backout PTF is to be generated (via the REVOKABLE 
operand). 

SYSxxx Required if the device on which the system history file resides is 


specified in the UNIT operand of the DEFINE HISTORY SYSTEM statement. 


Related Detail Control Statements 


Required: 
AFFECTS, DATA, RESOLVES APARS=apar-number 
Optional: 
DEFINE, INFLUENCES , INVOLVES , OR, 
REQUIRES, SUPERSEDES 


Description of Operands 


component[-ievel] : 
Specifies the component to which the PTF is to be installed. 


Level specifies the level number (formerly release number) of the applicable 
component. 


ptf-number: 
Specifies the number of the PTF to be installed. 


IRRevokable: 

When installing the PTF, MSHP will not produce any backout PTF jobs. The PTF 
cannot be revoked, that is, the status before the installation of the PTF cannot 
be recreated at a later point in time. 


REVokable: 
When installing the PTF, a backout PTF is to be generated on SYSPCH. 


Restrictions: Do not specify REVOKABLE for a PTF that is a pre- or co-requisite 
for other PTFs or has comparable local/APAR fix dependencies. 

Do not specify REVOKABLE if the PTF contains new or additional modules or macros 
that are not part of the current component release. 


INDirect: 
Specifies a PTF for indirect application via the Service Dialog of VSE/SP. 


Note: For compatibility reasons, the APPLY statement is still accepted in the 
‘old’ format. 
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fo Pode eo Se ah eee we ee pe ee pg ee 
| Operation | 
eigenen ee ee 
| component [ (level) } 
| [RELease=(release—number,...)] 


tL 


APply 


(level): 
Indicates the old three-character alphameric identifier of the component. 


Operands 


: ptf-number 


eee ee | 


RELease=(release-number,...): 
Specifies the release(s) of the component to which the PTF is to be installed. 
This operand applies to old-format statements only and is ignored if level was 
specified. If level was not specified, MSHP converts the release number into a 
level number. 


C= = aaa aa | 
| Operation | Operands 

i — 
|] ARChive | product | 
[i deb setariccosle cia ce | a cerecd St ere be Se eie aaies SESE Sele ae aisle alee che eth eg ien San ioes | 
| ARChive | component—level [PTF=ptf—number|APAR=apar—number | 
| | | SOFTreject] | 
LL je el 


The ARChive statement is used to make entries in the system history file. 


Logical Unit Assignments 


Required: 


SYSLST 


Optional: 


SYSxxx 


System printer. 


Required if the device on which the system history file resides is 


specified in the UNIT operand of the DEFINE HISTORY SYSTEM statement. 


Related Detail Control Statements 


CT To, Qe eee Pea he 

| ARCHIVE... Prod. | Comp. | PTF | APAR 
| AFFECTS | | | R | oR 
| ALTER | | | a) 
| COMPRISES PR | | 

| DEFINE if o [| o f| o | oO 
| DELETE | | | | oO 
| INSERT | | | ae) 
| INVOLVES | o. (| o | o | 

| OR | o f| o f]| o | 

| REPLACE | | | | Oo 
| REQUIRES | o | o | o | 

| RESOLVES } R | | R | Oo 
| SUPERSEDES | | ['. Or. 


| R = Required 
a eee el 
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Description of Operands 


product: 
Specifies that an entry for the named product is to be made in the system 
history fits. 


component-level: 
Specifies that an entry for the named component is to be made in the system 
history file. 


If a PTF or APAR is specified, ‘component’ identifies the component to which the 
particular PTF, local fix, or APAR fix to be archived applies. 


PTF=ptf-number: 
Identifies the PTF for which an entry is to be made in the historv file. 


APAR=apar-number: 
Identifies the local or APAR fix for which an entry is to be made in the history 
file. 


SOFT raiect: 

Specifies that a PTF which may have to be installed to the named component is to 
be installed even if, as a result, a local or APAR fix would be partially 
overwritten. (The same applies to a PTF that may have to be revoked.) For a 
component that is archived without SOFTREJECT specified. MSHP automatically 
rejects the installation (revocation) of a PIF that partially overwrites a local 
or APAR fix. 


T 
Operation | Operands 


| BACKup i History [S¥Stem!AUXiliary] 
t ! cae 


The BACKUP HISTORY statement requests MSHP to copy a history file located on 
disk onto magnetic tape. 


Logical Unit Assignments 
Roautrad: 


SYS006 The tape onto which MSHP writes the backup copy of the history file. 
SYSTST Svstam printer. , 


Required for BACKUP HISTORY AUXILIARY: 

SYSyyy The device on which the auxiliary history file resides. This can be 
either SYSO02 or the device specified in the UNIT operand of the 
DEFINE HISTORY AUXILIARY statement. 

Optional: 

SYSxxx Required for BACKUP HISTORY SYSTEM if the device on which the system 
history file resides is specified in the UNIT operand of the DEFINE 
HISTORY SYSTEM statement. 

Related Detail Controt Statements 

Required: none 

Optional: DEFINE 


Description of Operands 


History SYStem: 
Specifies that the system history file is to be copied to tape. 


History AUXiliary: 
Specifies that the auxiliary history file is to be copied to tape. 
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| | [HEADer=member—-name] [PRODuction] [GENEration] 


, = 
| Operation | Operands | 
eect 3 | 
| BACKup | PRoduct=(product,...)} ID='tapefile-id' | 


The BACKUP PRODUCT statement is used to produce, on magnetic tape, a backup copy 
of the named product(s}. This backup copy consists of the production and 
generation sublibraries of the product(s), together with the pertinent history 
file containing product-related entries. 


Logical Unit Assignments 
Required: 


SYS006 The tape onto which MSHP writes the backup copy of the named 
product(s). 
SYSLST System printer. 


Related Detail Control Statements 


Ranuired: none 


Optional: DEFINE HISTORY SYSTEM 
Description of Operands 


PRoduct=(product,...): 

Specifies the product(s) for which a backup copy is to be produced. 

All requested products must reside in the same set of production and generation 
sublibraries, since MSHP copies only entire sublibraries. 


ID='tapefile-id': 
Specifies that an identification is to be given to the created backup file, 
which MSHP can later use during RESTORE to locate the backup file. 


HEADer=member-name- 
Specifies an additional library member that is to be written as a header file 


onto the backup tape (as the very first file created with this BACKUP 
statement). 


PRODuction: 


Specifies that only the production sublibrary of the named product(s) is to be 
coniead 


GENEration: 


Specifies that only the generation sublibrary of the named product(s) is to be 
copied. 


| Operation | Operands | 
aa | 
| COPy | History {SYStem AUXiliaryjAUXiliary SYStem} | 
t J 


The COPY statement requests MSHP to copy a history file from disk to disk: 


° The sequence 'SYSTEM AUXILIARY' creates a copy of the system history file 
for use as an auxiliary history file. 

: The sequence ‘AUXILIARY SYSTEM' copies an auxiliary history file to the 
system history file. 
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Logical Unit Assignments 

Required: 

SYSLST System printer. 

SYSyyy The device on which the auxiliary history file resides. This can be 
either SYS002 or the device specified in the UNIT operand of the 
DEFINE HISTORY AUXILIARY statement. 

Optional: 


SYSxxx Required if the device on which the system history file resides is 


specified in the UNIT operand of the DEFINE HISTORY SYSTEM statement. 


Related Detail Control Statements 
Required: none 

Optional: DEFINE HISTORY 
Description of Operands 


History SYStem AUXiliary: 


Creates a copy of the system history file for use as an auxiliary history file. 


History AUXiliary SYStem: 
Copies an auxiliary history file to the system history file. 


Restriction 


If the history file extent resides on a newly defined VM minidisk, this extent 
should be initialized by: 


CMS command FORMAT, followed by 
VM disk initialization program IBCDASDI, or 
* Device Support Facilities INIT command with parameter ‘Mimic(Mini(n))'. 


Alternatively, you can use the MSHP RESTORE statement to restore a history file 


from tape to the minidisk extent. 


Nose are sg ge cig st ed ef Ee ee ee Oe a 8 es eae es, ed 


| Operation | Operands | 
a 
| CORrect | component[-level] : apar—number | 


| | [REVokable| IRRevokable]} | 
an ee 


The CORRECT statement specifies that a local or APAR fix is to be installed to a 


component. 

Note: To avoid an unintended removal of a fix due to linkage editor or 
assembly runs after the application of the fix, a correction should always be 
made in all applicable library members (phases, modules, macros). 

Logical Unit Assignments 


Required: 


SYSLST System printer. 


Optional: 

SYSLNK Linkage editor input file; needed if the correction requires 
link~-editing. 

SYSPCH Needed when correcting a macro. 
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SYS001, 
SYS004 Needed as work files if the correction involves 
a) modules or expandable phases 
b) macros. 
sysoo2, 
SYS003 Needed as work files if corrections to macros are involved. 
SYSxxx Required if the device on which the system history file resides is 


specified in the UNIT operand of the DEFINE HISTORY SYSTEM statement. 


Related Detail Control Statements 


Required: 
AFFECTS 

Optional: 
ALTER, DEFINE HISTORY SYSTEM, DELETE, 
INFLUENCES , INSERT, INVOLVES , REPLACE, 
REQUIRES, OR, RESOLVES ‘comment’, 
RESTART, SCAN, VERIFY 


The detail control statements must be entered in the following sequence: 


1. DEFINE HISTORY SYSTEM 
2. REQUIRES, OR 

3. RESOLVES 

4. AFFECTS 

5. 


ALTER, DELETE, INSERT, REPLACE, RESTART, SCAN, and VERIFY, if used, must be 
coded after the AFFECTS statement. 
6. INFLUENCES, INVOLVES. 


Description of Operands 


component{[ -level] : 
Specifies the component that is to be corrected by the local or APAR fix. 


If only one level is installed, MSHP applies the fix to this one; otherwise, 
MSHP informs you which levels are installed and asks you for the requested one. 


apar-number: 
Specifies the number of the local or APAR fix that contains the correction(s). 


REVokable: 


Specifies that corrections made to phases or modules can be removed by using the 
UNDO function. 


For corrections to macros, the REVOKABLE option causes a job to be created on 
SYSPCH with the UNDO control statement. 


IRRevokable: 
Specifies that corrections cannot be revoked. 


Note: For compatibility reasons, the CORRECT statement is still accepted in 
the ‘old’ format. 


Dig em we ey Re ee ee ee ee ee ee ee ee ee et 


| Operation | Operands | 
———— 
| CORrect | component[(level)] : apar—number | 


Me hn a 
(level): 


Indicates the old three-character alphameric feature identifier of the 
component. 
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ia —1 
| Operation | Operands | 
4 
| CReate | History [SYStem|AUXiliary] | 


The CREATE statement requests MSHP to preformat a history file. (For defining a 
history file, that is, creating extent definitions, refer to the DEFINE HISTORY 
detail control statement.) 

Logical Unit Assignments 

Required: 

SYSLST System printer. 

Required for CREATE HISTORY AUXILIARY: 


SYSyyy The device on which the auxiliary history file resides. This can be 
either SYSO062 or the device specified in the UNIT operand of the 
DEFINE HISTORY AUXILIARY statement. 


Optional: 
SYSxxx Required for CREATE HISTORY SYSTEM if the device on which the system 


history file resides is specified in the UNIT operand of the DEFINE 
HISTORY SYSTEM statement. 


Related Detail Control Statements 
Required: none 

Optional: DEFINE 

Description of Operands 


History SYStem: 
Specifies that a system history file is to be created. 


History AUXiliary: 
Specifies that an auxiliary history file is to be created. 


Restriction 


If the historv file extent resides on a newly defined VM minidisk. this extent 
should be initialized by: 


CMS command FORMAT, followed by 
VM disk initialization program IBCDASDI, or 
* Device Support Facilities INIT command with parameter 'Mimic(Mini(n))’. 


Alternatively, you can use the MSHP RESTORE statement to restore a history file 
from tape to the minidisk extent. 


er] 
| Operation | Operands { 
ee 


| DUMP | History [SYStem|AUXiliary] | 
a ated 


The DUMP statement requests MSHP to produce a formatted hexadecimal printout of 
a history file on SYSLST. 
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Logical Unit Assignments 

Required: 

SYSLST System printer. 

Required for DUMP HISTORY AUXILIARY: 

SYSyyy The device on which the auxiliary history file resides. This can be 
either SYSO002 or the device specified in the UNIT operand of the 
DEFINE HISTORY AUXILIARY statement. 

Optionai: 

SYSxxx Required for DUMP HISTORY SYSTEM if the device on which the system 
historv file resides is specified in the UNIT opverand of the DEFINE 
HISTORY SYSTEM statement. 

Related Detail Control Statements 

Required: none 

Optional: DEFINE 


Description of Operands 


History SYStem: 
Specifies that the system history file is to be dumped. 


History AUXiliary: 
Specifies that the auxiliary history file is to be dumped. 


é 
| 


Operation | Operands | 
iene ! sete 
| INCorporate| component{—level] [RELease=release-number ] | 


The INCORPORATE statement is used to install a component distributed in SYSIN 
format. 


Loaical Unit Assianments 

Required: 

SYSLNK Linkage editor input file. 
SYSOO1 Linkage editor work file. 
SYSLST System printer. 


Optional: 


SYSxxx Required if the device on which the system history file resides is 


specified in the UNIT operand of the DEFINE HISTORY SYSTEM statement. 


Related Detail Control Statements 
Required: DATA 


Optional: DEFINE, INVOLVES , OR, REQUIRES. 
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Description of Operands 


component{[-level] : 
Identifies the component to be incorporated. 


RELease=release-number: 

Specifies the release of the component to be incorporated (only applicable if 
‘level' is not specified in the component operand). MSHP converts the release 
number into a level number. 


fo ee ee bee Po oS eee ey pte ptt bee to ek ee Ee Bo 
| Operation | Operands | 
INSTall | {PRoduct|SYsres} 

| [FROMTape[ID='tapefile~id']|FROMDisk] {INto=lib| 
| {[PRODuction INto=lib[.sublib]] 

| 


| 
| 
| [GENEration INto=(lib[.sublib],...)]} 


The INSTALL statement requests MSHP to install either a product, such as 
VSE/VSAM, or a SYSRES package, such as VSE/Advanced Functions. 


The history file that accompanies the programming support reflects the contents 
of the shipment package; it may contain information on any requirements that 
have to be met prior to installation (for example, pre-requisite components or 


PTFs}. When executing the INSTALL function, MSHP informs you of any missing 
requirements. 


MSHP also determines (by analyzing the shipment history file and your system's 

history file) which of the products already installed in your system are 

compatible with the shipped product and which are superseded. 

Logical Unit Assignments 

Required: 

SYS006 Distribution tape. 

SYSyyy The device on which the auxiliary history file resides. This can be 
either SYS002 or the device specified in the UNIT operand of the 
DEFINE HISTORY AUXILIARY statement. 


Optional: 


SYSxxx Required if the device on which the system history resides is 
specified in the UNIT operand of the DEFINE HISTORY SYSTEM statement. 


Related Detail Contro] Statements 

Required: none 

Optional: DEFINE HISTORY, COMPATIBLE 
Description of Operands 


Product: 
Specifies that a product (non-SYSRES package) is to be installed. 


SYSres: 
Specifies that a SYSRES package is to be installed. 


FROMTape: 


Specifies the distribution tape. 
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MSHP restores the history file from the distribution tape into an auxiliary 
history file. You may either use the standard SYS002 work file for the auxiliary 
history file or define it with a DEFINE HISTORY AUXILIARY statement. 


With the restored auxiliary history file, checking for pre-, co-, and 
negative-requisites is performed. If all checks and verifications prove 
satisfactory, the distribution libraries are restored into the specified target 
libraries, and the restored distribution history file is merged with the current 
system history file. 


ID='tapefile-id': 

Indicates that the distribution tape is to be searched for the denoted 
tapefile-id, which was specified with the BACKUP statement. If the tape is not 
correctly positioned, it will be scanned (forward only) for the specified id and 
correctly positioned before installation. 


FROMDisk: 


FROMDISK must be specified to support the INSTALL function for a system without 
magnetic tape. 


Defaults: 


: For INSTALL SYSRES, you must always specify the names of the target 
libraries (lib) and provide the necessary label information (DLBL/EXTENT). 
If the libraries do not exist, MSHP creates them. If you do not specify a 
sublibrary (sublib) name, MSHP takes the name of the shipment sublibrary, 
which is SYSLIB. 

* For INSTALL PRODUCT, you need not specify the names of the target libraries 
and sublibraries, if these libraries exist (online) and label information is 
available in the label area. 


INto=lib: 

Specifies, for INSTALL PRODUCT only, installation of both the production and the 
generation part of the shipment package into the library denoted by 'lib'. (For 
INSTALL SYSRES, the generation part must be installed into a different target 
library than the production part.) 


PRODuction INto=lib[.sublib]: 

Specifies installation of the executable (production) part of the shipment 
package, which consists of all phases, procedures (and some modules/macros) 
needed for daily operation of your system or product. The production part must 
be installed before the generation part. 


GENEration INto=(lib[.sublib],...): 

Specifies installation of the generation part of the shipment package, which 
contains those modules and, possibly, macros that are needed for the 
regeneration of the product. 


a a a a 
| Operation | Operands | 


a 
| INSTall | {SExvice[REVokable|REStart] {TAPes=no.—of—tapes] [SD] | 
| | {BAckout [REStart]} 


The INSTALL SERVICE statement requests MSHP to install PTFs from one or more 
service tapes. 


The INSTALL BACKOUT statement requests MSHP to install one or more backout PTFs, 
which amounts to recataloging the library member(s) replaced by installing the 
corresponding PTF(s). The statement works in the same way as the INSTALL SERVICE 
statement, except that it reads the PTF information from the backout tape, which 
is created when you specify the REVOKABLE operand in the INSTALL SERVICE 
statement. 


Via the INCLUDE and EXCLUDE detail control statements you can specify that only 
certain products, components, or PTFs are to be included or excluded during the 
service application. If you omit the EXCLUDE and INCLUDE statements, all service 


tape PTFs which are applicable to your system will be selected for service 
installation. 
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MSHP prints. a list of all PIFs that are to be installed and asks you for 
confirmation before it replaces the affected library members in your 
sublibraries and updates the history file. 


Logical Unit Assignments 
Required: 


SYS006 Service/backout tape. 
SYS002 Work file used by MSHP. 
SYSLST System printer. 


Optional: 


SYSxxx Required if the device on which the system history file resides is 
specified in the UNIT operand of the DEFINE HISTORY SYSTEM statement. 

SY5004 Needed if backout PTF jobs are to be created (by specifying the 
REVOKABLE operand). 


Related Detail Contro] Statements 

Required: none 

Optional: INCLUDE, EXCLUDE (for INSTALL SERVICE onlv) 
Description of Operands 


SErvice: 
Specifies that MSHP is to install PTFs from the service tape(s), as detailed in 
any INCLUDE or EXCLUDE detail control statements. 


REVokable: 

Specifies that backout jobs are to be created for all PTFs that are to be 
installed, The backout jobs are MSHP jobs with the REVGKE function control 
statement included, The backout jobs are written in blocked format onto a tape 
which must be assigned as SYS004. 


BAckout: 

Specifies that MSHP is to install one or more backout PTFs from the backout tape 
which is produced by the INSTALL SERVICE function with the REVOKABLE option. The 
PTFs to be installed can be selected via the INCLUDE statement. 


REStart: 

Requests MSHP to restart a previous INSTALL SERVICE/BACKOUT or APPLY/REVOKE job 
whose final link step failed. MSHP scans the history file entries for those PTFs 
that were correctly cataloged, but not yet linked, and invokes the linkage 
editor to complete the finai link step. 


TAPes=no. -of-tapes:; 

Indicates to MSHP the number of tape volumes that have to be scanned for the 
particular service installation. If yeu know that prerequisite PTFs exist on 
other service tapes and that these PTIFs are not yet installed, have MSHP scan 
these additional tape volumes for the prerequisite PTFs and have them retrieved 
for instaliation. 

The additional tapes (maximum number=9) are to be mounted, on the tape drive 
assigned to SYS006, in response to MSHP's mount request. 

If the operand is omitted, one tape volume is assumed. 


SD; 

This operand indicates that service is to be applied via the VSE/SP Service 
Dialog. For those PTFs that are fiagged with the INDIRECT option (in the APPLY 
statement), the library members affected by the service application are first 
linked to a reserved sublibrary $SMSHPIL before they are finally moved into the 
system sublibrary IJSYSRn.SYSLIB. This is to protect the IPLed SYSLIB in case 
the final link step fails. 
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tg See ee 
| Operation | Operands 
LIST ERVICEtape 


iS) 
{DOCument | NODOCument | [ XREF | NOXREF ] 
{ 


| 

| 

| {CoVer [CONTinuous | SEParate]|NOCOVer] 
Le Saar See eae ee 


faceless 


The LIST statement requests MSHP to print, on SYSLST, information from a service 
tape. 


Logical Unit Assignments 
Required: 


SYS006 Service tape. 
SYSLST System printer. 


Optional: 


SYSo02 Needed as work file if COVER is specified. 
SYSxxx Required if the device on which the system history file resides is 
specified in the UNIT operand of the DEFINE HISTORY SYSTEM statement. 


Related Detail Control Statements 

Required: none 

Optional: PTF (if COVER is specified) 
Description of Operands 


SERVICEtape: 
Specifies that information from a service tdpe is to be printed. 


DOCument: 
Specifies printing of the service tape documentation, which contains information 
on how to apply corrective and preventive service from the service tape. 


NODOCument: 
Suppresses the DOCUMENT function. 


XREF : 
Specifies printing of the cross-reference list of all PTFs shipped on the 
service tape. 


NOXREF: 
Suppresses the KREF option. 


COVer: 

Specifies printing of the cover letters of those PTFs that are listed on an 
associated PTF detail control statement. If no PTF statement is given, the cover 
letters of all PTFs on the service tape are printed. 


NOCOVer: 
Suppresses the COVER function. 


CONTinuous: 
Specifies that the cover letters of the PTFs are to be printed without starting 
anew page for each PTF. 


SEParate: 
Causes a new page to be started for each PTF cover letter that is to be printed. 
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| Lookup | PRoduct=product — 
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Lookup [component [(—level]] [PTF=ptf—number 


| 

| | PHAse=membexr—name [DATA] 
| | MODule=member—name [DATA] 
| | MACro=member—name 


| 
| 
| APAR=apar—number | 
| 
[TYpe=member—type] [DATA] ] | 


é 
The LOOKUP statement requests MSHP to display, on SYSLOG, selected information AD 
from the system history file. 
Logical Unit Assignments 
Optional: 
SYSxxx Required if the device on which the system history file resides is 

specified in the UNIT operand of the DEFINE HISTORY SYSTEM statement. f- . 

Related Detail Control Statements kL 
Required: none ; 
Optional: DEFINE HISTORY 


Description of Operands 


PRoduct=product: 
Indicates that the following information is to be displayed for the specified 
product-id: 


Date of installation, 

Requirements to be met for installation. 
Component(s) contained in the product. 
Comment:, if any. 


component[-level] : 
Specifies the component for which information is to be displayed. 


If level is omitted and more than one level of the component is installed, ail 
levels of the component information will be displayed. 


PTF=ptf-number: 
Indicates that, for the given ptf-number, the history file information is to be 
displayed. 


APAR=apar-number: & 
Indicates that, for the given apar-number, the history file information is to be 
displayed. 


PHAse=member-name: 
Indicates that, for the given phase-name, the history file information is to be 
displayed. 


MODule=member- name: 
Indicates that, for the given module-name, the history file information is to be 
displayed. 


MACro=member- name: 7 
Indicates that, for the given macro-name, the history file information is to be : 
displayed. 


TYpe=member-type: 

Indicates the type of the specified macro. Member-type may be one character 
only. 

If the operand is omitted, type E is assumed. 
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DATA: 


Specifies that the source data from which the phase/module/macro was generated 
(with TAILOR KEEPDATA) is to be displayed. 


fee eo le Sf et SE a ee Oe ae 


| Operation | Operands | 
| MERge | History {SYStem AUXiliary|AUXiliary SYStem} | 
Gi an Ee ee 


The MERGE statement requests MSHP to insert entries of one history file into 
another history file. 


The sequence of the keywords SYSTEM and AUXILIARY defines the direction of the 
merge operation. The first keyword specifies the source history file, and the 
second the target history file. The two keywords must be specified adjacent to 
each other. 


Restriction: Both the source and the target history files must reside on disk. 
Logical Unit Assignments 

Required: 

SYSLST System printer. 


SYSyyy The device on which the auxiliary history file resides. This can be 
either SYS002 or the device specified in the UNIT operand of the 
DEFINE HISTORY AUXILIARY statement. 


Optional: 


SYSxxx Required if the device on which the system history file resides is 
specified in the UNIT operand of the DEFINE HISTORY SYSTEM statement. 


Related Detail Control Statements 
Required: none 

Optional: DEFINE 
Description of Operands 


History SYStem AUXiliary: 
Specifies that entries from the system history file are to be merged into an 
auxiliary history file. 


History AUXiliary SYStem: 
Specifies that entries from an auxiliary history file are to be merged into the 
system history file. 


fea 2 SS ig rg at 
| Operation | Operands | 
SS SSS SSS SS 
PERsonalize | ['customer—name' ] | 
| [ADDRess='customer~—address' ] | 
| [PHone='phone—-number' ] | 
| [PRogrammer='programmer-—name' ] | 
| | 


[ENVironment='description' ] 
|r 9 ee aN RA PRESS a PR SIS OS Re SO SE NU OO | 


The PERSONALIZE statement is used to identify a history file and relate it to a 
specific user. 
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Restrictions: 
* To personalize your system's history file, MSHP needs at least one operand. 
If the history file has not been personalized before, specification of 
customer-name and customer-dddress is mandatory. 
* The first personalization of a history file changes the dates of all PTF 
entriés to the date when the PERSONALIZE statement is given- 
Logical Unit Assignments 
Required: 
SY¥SLST System printer. 
SYSyyy The device on which the auxiliary history file resides. This can be 
either SYSO002 or the device specified in the UNIT operand of the 
DEFINE HISTORY AUXILIARY statement. 
Optional: 


SYSxxx Required if the device on which the system history file resides is 
specified in the UNIT operand of the DEFINE HISTORY SYSTEM statement. 


Related Detail Control Statements 
Required: none 

Optional: DEFINE HISTORY 
Description of Operands 
‘customer-name’: 


Specifies the user*s name that is to be entered in the history file. (1 to 20 
characters, enclosed in quotes}. 


Restriction: If the history file has not been personalized before, customer~name 


must be specified. 


ADDRess='customer-address': 
Specifies the address that is to be entered in the history file. (1 to 45 
characters, enclosed in quotes.) 


Restriction: If the history file has not been personalized before, 
customer-address must be specified. 


PHone='phone- number’: 
Specifies the phone-number that is to be entered in the history file. (1 to 17 
characters, enclosed in quotes.) 


A null string ('') is accepted; it erases a previously specified number. 
PRogrammer='programmer- name’: 

Specifies. the programmer name that is to be entered in the history file. (1 to 
24 characters, enclosed in quotes.) 


A null string ('') is accepted; it erases a previously specified name. 


ENVironment='description’: 


Specifies any additional information (for example, the release level) that is to 


be entered in the history file. 
(1 to 62 characters, enclosed in quotes.) 
A null string ('') is accepted; it erases a previously specified description. 
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| REMove 
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component-—level [PTF=ptf-number 


| APAR=apar—number 

| PHAse=member—name 

|MODule=member—name 

| MACro=member—name 
(Type=member-type] } 


The REMOVE statement requests MSHP to erase entries from the system history 
file. The space of the removed history file entries is freed for future use. 


Note: MSHP does not remove an APAR that was archived as a ‘resolved’ APAR in 


conjunction with a PTF. 


However, you may still receive messages 


MO28I REMOVE IN PROGRESS and 
M041i FUNCTION COMPLETED 


Logical Unit Assignments 


Required: 

SYSLST ystem printer. 

Optional: 

SYSxXxx Required if the device on which the system history file resides is 


specified in the UNIT operand of the DEFINE HISTORY SYSTEM statement. 


Related Detail Control Statements. 


Required: none 


Optional: DEFINE HISTORY 


Description of Operands 


product: 


Indicates that the entry for the specified product is to be removed from the 


history file. 


component-level: 


Indicates that the entry for the specified component is to be removed (if no 


further operand follows) - 


If followed by another operand, "component' indicates the component to which the 
specified PTF, APAR, or library member refers. 


PTF=ptf-number: 
Indicates that the entry 


APAR=apar-number: 
Indicates that the entry 


PHAse=member-name: 
Indicates that the entry 


MODule=member- name: 
Indicates that the entry 


for the 


for the 


for the 


for the 


specified PTF number is to be removed. 


specified APAR number is to be removed. 


specified phase name is to be removed. 


specified module name is to be removed. 
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MACro=member-name: 
Indicates that the entry for the specified macro name is to be removed. 


TYpe=member-type: 
Indicates the type of the macro to be removed. (may be 1 char. only.) 
If the operand is omitted, type E is assumed. 


fos en em bee Bel Vee 
| Operation | Operands | 


| RESIdence | PRODuct=(product,...} PRODuction=lib.sublib | 
| | [GENEration=(lib.sublib,...)] | 
i a re ee ee 


The RESIDENCE statement defines the names of the production and generation 
sublibraries in which the named products are to reside. This information is 
recorded in the history file for any follow-on activities, such as service 
applications, tailoring, installation, or product backup. 

Any sublibrary names previously recorded in the history file (via another 
RESIDENCE or an INSTALL statement) are erased. 


Logical Unit Assignments 
Required: 
SYSLST System printer. 
Optional: 


SYSxxx Required if the device on which the system history file resides is 
specified in the UNIT operand of the DEFINE HISTORY SYSTEM statement. 


Related Detail Control Statements 
Required: none 

Optional: DEFINE HISTORY SYSTEM 
Description of Operands 


PRODuct=(product,...): 
Specifies the name(s) of the product(s) whose residence is to be defined. 


PRODuction=lib.sublib: 
Indicates that the production part of the product(s) is to reside in the named 
library and sublibrary. 


GENEration=(lib. sublib,...): 
Indicates that the generation part of the product(s) is to reside in the named 
library and sublibrary. 


a a aa | 
| Operation | Operands | 
RESTore | {PRoduct|SYsres} {INto=lib| 

| PRODuction INto=lib[.sublib] 

| GENEration INto=(lib[.sublib],...)} 
| [ID='tapefile—id'] 


The RESTORE statement is used to restore a complete shipment tape (production 
part, generation part, and shipment history file) onto disk; however, without 
any checks or updates of the system history file. 
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Logical Unit Assignments 
Required: 


SYS006 Distribution tape. 

SYSLST System printer. 

SYSyyy The device on which the auxiliary history file resides. This can be 
either SYS002 or the device specified in the UNIT operand of the 
DEFINE HISTORY AUXILIARY statement. 


Optional: 


SYSxxx Required if the device on which the system history file resides is 
specified in the UNIT operand of the DEFINE HISTORY SYSTEM statement. 


Related Detail Control Statements 
Required: none 

Optional: DEFINE HISTORY AUXILIARY 
Description of Operands 


PRoduct: 
Specifies that a product (non-SYSRES package) is to be restored. 


SYsres: 
Specifies that a SYSRES shipment package is to be restored. 


INto=lib: 
Specifies, for RESTORE PRODUCT only, that both the production and the generation 
part of the shipment package are to be restored into the library denoted by lib. 


PRODuction INto=lib[.sublib]: 
Specifies that the production part of the shipment package is to be restored to 
the named library (and sublibrary). 


GENEration INto=(lib[.sublib],...): 
Specifies that the generation part of the shipment package is to be restored to 
the named library or libraries. 


ID='tapefile-id’: 

Indicates that the shipment tape is to be searched for the denoted tapefile-id, 
which was specified in the BACKUP statement. If the tape is not correctly 
positioned, it is scanned (forward only) for the specified tapefile-id and 
correctly positioned. 

The tapefile-id can be one to 16 characters. 


Fee age ge ee Se ee ee ee eR ee PT Sie sel 


| Operation | Operands | 
| RESTore | History [SYStem]AUXiliary] | 
a ee a gaa i Ee 


The RESTORE HISTORY statement requests MSHP to write a history file located on 
magnetic tape onto disk. For processing, the tape must be positioned to the file 
containing the history file. 

Logical Unit Assignments 


Always required: 


SYS006 The tape containing the history file. 
SYSLST System printer. 


Required for RESTORE HISTORY AUXILIARY: 
SYSyyy The device on which the auxiliary history file resides. This can be 


either SYSO02 or the device specified in the UNIT operand of the 
DEFINE HISTORY AUXILIARY statement. 
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Optional: 


SYSxxx Required if the device on which the system history file resides is 
specified in the UNIT operand of the DEFINE HISTORY SYSTEM statement. 


Related Detaif Control Statements 

Optional: DEFINE HISTORY 

Description of Operands 

History SYStem: 

Specifies that the history file is to be copied to the system history file (a 
disk file with the file name IJSYSHF). 

History AUXiliary: 


Specifies that the history file is to be copied to the auxiliary history file (a 
disk file with the file name IJSYS02). 


| Operation | Operands 


| RETRace | [PRODucts 
| | |COMPonents[IDentifier=component [—level]} 


| | | PTFs|APARs | MEMbers ] 


Se 7 
H 

a 

| 

| 

| 
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The RETRACE statement requests MSHP to print information from the system history 
file om SYSLST. 


Defaults: If RETRACE is specified without any keywords, MSHP writes, to SYSLST, 
an overview report on the system's current service level. 


Logical Unit Assignments 
Required: 
SYSLST System printer. 
Optional: 


SYSxxx Required if the device on which the system history file resides is 
specified in the UNIT operand of the DEFINE HISTORY SYSTEM statement. 


Related Detail Control Statements 
‘Required: none 

Optional: DEFINE HISTORY 
Description of Operands 


PRODucts: 
Requests MSHP to print a list of all installed products. 


COMPonents: 
Requests MSHP to print a list of all component records from the history file. 


COMPonents |IDentifier=component[-level]: 
Requests MSHP to print information for the specified component only. If level 
is omitted, MSHP prints information for all installed levels of the component. 


PTFs: ; 
Specifies that all applied PTFs are to be listed (in ascending sequence). 


APARs: 


Specifies that all APARs are to be listed (in ascending sequence) which were 
corrected by a PTF or local/APAR fix. 
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MEMbers: 


Td Specifies that all phases, modules, and macros that are affected by a PTF or 
local fix are to be listed. 


Note: Since RETRACE MEMBERS does not indicate whether an APAR, PTF, or 
component is incorrect or incomplete, use RETRACE APARS|PTFS|COMPONENTS instead. 


| 


| Operation | Operands | 
| REVoke | component(—level] : ptf-—number 
[eee ee eae tear eee j 


The REVOKE statement initiates a backout PTF job that contains. the phases, 
modules, and macros as they were before the named PTF was installed. This 
backout PTF job (with the initial REVOKE statement) is generated by the APPLY or 
INSTALL SERVICE statements if REVOKABLE was specified. 

A PTF cannot be revoked if it is a prerequisite for another PTF that has not 
been revoked previously. 


My Logical Unit Assignments 


end Required: 


SYSLNK Linkage editor input file. 
SYSOO1 Linkage editor work file. 
SYSLST System printer. 

Optional: 


SYSxxx Required if the device on which the system history file resides is 
specified in the UNIT operand of the DEFINE HISTORY SYSTEM statement. 


Related Detail Control Statements 
Required: DATA 
Optional: none 


Description of Operands 


component[-level]: 
Identifies the component for wnich the backout PIF was generated. 


ptf-number: 
| Identifies the PTF that is to be revoked. 


| Operation | Operands | 
i 
a ae | 
ar | SELect | GENFile COMPonent=component [—level] | 
FO a er ree) 


The SELECT statement identifies the generation file, from which individual 
phases, modules, or macros can be regenerated (with the GENERATE detail control 
statement) after a service application. 


Logical Unit Assignments 


| : Required: 


OT af SYSO0S Generation file. 


SYSLNK Linkage editor input file. 
SYSOO1 Linkage editor work file. 
SYSLST System printer. 


ww 
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Optional: ! 
%, 
SYSxxx Required if the device on which the system history file resides is ~ 
specified in the UNIT operand of the DEFINE HISTORY SYSTEM statement. 
Related Detail Control Statements 
Required; GENERATE 
Optional: DEFINE HISTORY é Gs 
Description of Operands % 
GENFile: 
Indicates the generation file. 
component[-level] : 
Identifies the component to which the members to be regenerated belong. 
The level indication must be the same as that of the corresponding TAILOR job. 
| Operation | Operands { | 
NG 
TAILor component (—level] PHAse=member—name 


| 

| | MODule=member—name 

} | MACro=member—name 

| [TYpe=member~—type] } 
| [KEEPdata] 

| Sa RN, ER NN PN eR ee CEE eR OE | 


The TAILOR statement (together with the EXECUTE detail control statement) is 

used to generate (tailor) library members of components that are shipped in 

source-macro format and that have to be assembled and link-edited according to 

the specific needs of your installation (for example, supervisor macros). 

Logical Unit Assignments 

Required: 

SYSLNK Linkage editor input file. 

SYsSo0ol Linkage editor/assembler work file. 

SYSO02, 

SYS003 Assembler work files. 

SYSLST System printer. 

Optional: 

SYS004 Work file needed by MSHP if MODULE= or MACRO= is specified. 

SYSxxx Required if the device on which the system history file resides is < 
specified in the UNIT operand of the DEFINE HISTORY SYSTEM statement. \ 

Related Detail Control Statements 

Required: EXECUTE 

Optional: RESOLVES DEFINE 


Description of Operands 


are 


component[-level]: 

Identifies the component containing the macro, module, or phase to be tailored. 

PHAse=member- name: 

Specifies the name of the phase to be generated. (See Note, below.} For 

retailoring, generic names such as DFH* are allowed. MODule=member-name: 

Specifies the name of the module to be generated. (See Note, below.) For 

retailoring, generic names such as DFH* are allowed. 

MACro=member- name: 
Specifies the name of the macro (definition) to be assembled. (See Note, below.) &£ . 


For retailoring, generic names such as DFH* are allowed. 
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TYpe=member-type: 

Indicates the type of the macro to be assembled. Member-type may be one 
character only. 

If the operand is omitted, type E is assumed. 


KEEPdata: 
Specifies that the source code processed by the invoked control program(s) is ta 
be stored in the system history file. 


Note: The operands PHASE=, MODULE=, or MACRO= do not generate any PHASE or 
CATALOG statements. You have to include these statements after the EXECUTE 
detail control statement. 


ogre Oe en ee ee nt eee ie ges Lea Sa eee en a ett 


| Operation | Operands f 
| UNdo | component{—level] : apar~number } 
Re i a ee 


The UNDO statement is used to re~establish the status of a library member as it 
existed before a local or APAR fix was applied with the CORRECT. ..REVOKABLE 
statement. 


Restriction: If a phase has been expanded by a local or APAR fix, this expansion 
cannot be removed. The phase remains expanded. 


For phases and modules, MSHP may be invoked with an UNDO statement that refers 
(by component and apar-number) to the correction as specified in the CORRECT 


statement. 


For macros, the UNDO statement is included in the job created (on SYSPCH) by 
CORRECT. ..REVOKABLE. 


Logical Unit Assignments 

Same as for CORRECT. 

Related Detail Control Statements 

Required: none 

Optional: DEFINE HISTORY SYSTEM DATA 

Description of Operands 

component{[ -level] : 

Specifies the component from which the local or APAR fix (initiated by CORRECT) 


is to be removed. 


apar-number: 
Specifies the local or APAR fix (initiated by CORRECT) that is to be removed. 
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a 
| Operation | Operands | 
| AFFects | [PHAses=(member—name,...} [EXPand=size~increment]] | 
| | [MODules=(member—name,...) [LIOCS] [ESDid=esd—number] | 
| | {EXPand=size—increment ]} | 
| | [MACros=(member—name,...} [TY¥pe=member—type] } i 
The AFFECTS statement identifies the phases, modules, and macros that are 
affected by a PTF or local fix application. 


Restrictions: 


* One AFFECTS statement may not refer to more than a total of 100 phases, 
modules, and macros. 

° If AFFECTS is used as a detail control statement to CORRECT, or when 
archiving a local/APAR fix and the fix information itself, only one phase, 
module or macro may be specified. 


Description of Operands 


PHAses=(member-name,...}: 
Specifies the affected phase(s). 


EXPand=size-increment: 

Indicates that the specified phase or module (see below} is to be made larger by 
the number of bytes specified in size-increment (1 to € decimal digits), so that 
fix code can be added at the end of the phase or module. 


EXPAND may be specified only when applying a local/APAR fix (with CORRECT) or 
archiving a local/APAR fix. 


MODules=(member-name, ...): 
Specifies the affected module(s). 


LIOCS: 
Indicates that a LIOCS module is affected by the PTF. 


ESDid=esd-number: 
Indicates that a change applies to the specified ESD. 


MACros=(member-name,...}: 
Specifies the affected macro(s). 


TYpe=member-type: 
Indicates the type of the affected macro. 
If the operand is omitted, type E is assumed. 


i" TY 
Operation | Operands 


Fates | 


7 
+. 
| ALter address old-text : new-text | 
a ee ee 
The ALTER statement identifies the modifications that are to be made to a phase 
or module. This includes verification of the alteration for phases and, 
optionally, for modules. 
Description of Operands 
address: 


Specifies the (relative) address where the new-text is to begin to replace the 
old-text. (1 to 6 hexadecimal digits.) 
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old-text: 
Specifies the text that is to be replaced. 
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MSHP checks the text in the phase or module at the specified address whether it 
is identical with the old text; replacement by new text takes place only if the 


text is identical. 


Restrictions: Old-text must be specified when modifying a phase; it may be 


specified when modifying a module. 


Old-text can be any of the three formats described in the MSHP USERs GUIDE under 


the description for the ALter Detail Control Statement. 


new-text: 


Specifies the text that is to replace the text at the specified address. 


For new-text the same rules are valid as for old-text. 


If old-text is specified, new-text must have the same length (in bytes). 


If new-text is specified without old-text, the colon must be specified at the 


beginning of the new-text line. 


Operation Operands 


COMPAtible WITH=(product,...) 


eke awe 


i 
| 
ls 


The COMPATIBLE statement is used to indicate to MSHP at installation time those 


products that are compatible with the shipped product(s}. 


Compatible products are usually based on the same base products, contain the 


same component(s) as the shipped product(s), and may run concurrently with each 
other. Compatible products may also be stored in the same sublibrary. 


Description of Operands 


WITH=(product,...): 
Specifies the name(s) of the compatible product(s). 


| Operation | Operands 
L t | 
| COMPRises | component [PHAses=(member-—name,...)] 

| | [MODules=(member—name,...)]} | 
| | [MACros=(member—name,...} | 
| | [TYpe=member—type] } | 
\ wk 4 


The COMPRISES statement is used to specify the component(s) comprised in the 


shipped product and the library members that make up the component(s). The 
information is entered in the system history file. A separate COMPRISES 
statement must be issued for each component contained in the shipped product. 


Restriction: One COMPRISES statement may not refer to more than a total of 100 


phases, modules, and macros. 
Description of Operands 


component: 
Specifies the component comprised in the shipped product. 


PHAses=(member-name,...): 
Specifies the phases of the named component. 


MODules=(member-name,...): 
Specifies the modules of the component. 
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MACros=(member-name, ...): 
Specifies the macros of the component. 


TYpe=member-type: 


Indicates the type of the affected macro. 
If the operand is omitted, type E is assumed. 


[Roane ee a ene Se Sy ap ee cs oR eee GOS Re Vg ee 


| Operation | Operands | 
po ee 
| DATA | no operands } 


The DATA statement in conjunction with /$ delimits input that is to be passed by 
MSHP to the linkage editor or the librarian. 


Restrictions: 


¢ A DATA statement (with its corresponding terminating delimiter /$) may be 
followed only by another DATA statement, not by any other detail control 
statement. 

e The end-of-data indicator (/$) is valid only when input is entered via 
SYSIPT. Substitute this delimiter by hitting END/ENTER if input is entered 
from the console. 

° Input for the linkage editor must not contain ‘named INCLUDE’ statements; 
however, this is not checked by MSHP. 


Linking from a link-book (where link-book is an object module that contains 
LNKEDT control statements) must be requested with the MSHP statement INVOLVES. 


MSHP checks the first line after the DATA statement. If this is a linkage editor 
control statement, all input up to the next /$, is passed to the linkage editor. 
If it is a librarian control statement, it is passed to the librarian program. 


MSHP internally converts any old MAINT CATALR and CATALS statements into the 
catalog statement. 


[a ees ee a | 
| Operation | Operands | 
$$$ $j 

DEFine History [AUXiliary|SYStem] 


| | 
EXTent=start-track: tracks | 
| {SPlit=split—track] | 
| [ UNIT=SYSxxx ] | 
| [IDentifier='file—-identifier'] | 
a a a a 


The DEFINE statement is used to create extent definitions for a history file in 
the user label area of the partition in which MSHP is executed. 


Restrictions: 


° If you use IBM-supplied standard labels or if your own standard label set 
contains DLBL and EXTENT statements for the system history file (filename 
IJSYSHF), do not use DEFINE HISTORY SYSTEM in any MSHP job accessing the 
system history file. 

° A DEFINE statement, if used, must immediately follow the applicable function 
contro] statement; it may not be placed at the end of several functions or 
at the end of the job stream. 


Description of Operands 


History: 
Specifies that a history file is to be defined. 


AUXilary: 
Specifies that an auxiliary history (work) file is to be defined. 


5-88 IBM VSE/Advanced Functions Handbook 


wee 


on 


Sd 


Licensed Material - Property of 1BM © Copyright 1BM Corp. 1985 


The auxiliary history file is maintained under the filename IJSYSO2 on the 
default logical unit SYS002. MSHP normally uses this file as a history work 
file. 

The DEFINE HISTORY AUXILIARY statement allows you to explicitly define a 
temporary auxiliary history file (in the user label area) on the logical unit 
indicated in the UNIT operand. 


SYStem: 
Specifies that the system history file is to be defined. 


The system history file is part of the IBM-distributed system and is maintained 
under the filename IJSYSHF. To access the file, MSHP uses the IBM-set default 
logical unit SYSREC. However, you can use any programmer logical unit to refer 
to the file if you place it on a volume other than that of SYSREC. The history 
file should be permanently defined. If it is to be on the SYSREC volume, supply 
the following statements: 


// DLBL IJSYSHF, 'A5666301.SYSTEM.HISTORY.FILE’ ,99/365 
// EXTENT SYSREC,,1,0,start-address ,number-of-tracks/blocks 


With the DEFINE HISTORY SYSTEM statement you can define a temporary system 
history file on the logical unit specified in the UNIT operand. This definition 
is, of course, valid only for the duration of the applicable MSHP job. 


Since the system history file normally contains all the status information of 
the system, you should always keep a backup copy of it. 


EXTent=start-track:tracks: 


Specifies the extent information for the history file. 


Start-track specifies the sequential number of the track (relative to zero) 
where the extent is to begin. 

For FBA devices, start-track indicates the block number at which the extent is 
to start. 


Tracks specifies the number of tracks (or FBA blocks) to be allocated to the 
history file. 


The following list gives suggested sizes of the extents required for the various 
device types; the values apply to both system and auxiliary history files. (The 
values in brackets show the maximum sizes MSHP uses.) 


2314/2319: 80 (289) tracks 
3330/3333: 38 (145) tracks 
3340/3344: 96 (289) tracks 


3350: 30 (109) tracks 
3375: 15 (61) tracks 
3380: 15 (46) tracks 


FBA DASDs: 900 (3460) FBA blocks 


SPlit=split-track: 

Specifies, for CKD devices, which track is the last one in each cylinder to be 
allocated to the history file. (The first cylinder occupied by the file is the 
one in which the “start-track" lies, and the last cylinder is determined by the 
number of tracks specified.) 


Split-track is a decimal integer equal to the number of tracks per cylinder 
minus one. 


UNIT=SYSxxx: 
Specifies the logical unit (other than SYSREC) on which the history file is to 
reside. 


Defaults: If not specified, MSHP takes the following defaults: 


For a system history file: SYSREC 
* For an auxiliary history file: SYSO02 
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IDentifier='file-identifier’: 
Specifies the history file identification that is to be entered in the VTFOC. (1 bow 
to 44 alphameric characters enclosed in quotes.) : 


Defaults: If the operand is not specified, MSHP takes the following defaults: 


* For an auxiliary history file: 'DOS.AUXILIARY.HISTORY.FILE' 
* For the system history file: 'DOS.SYSTEM.HISTORY.FILE' 


Feqce ssc SE a fC ee tee SP A eT ee ee ee ee ig ry 

| Operation | Operands | & 
x, 

| DELete | [from-line[+rel]] : to-line[trel] |. ‘. 

oe a eee ee A ee ee ett ies ee ete Act ee 


The DELETE statement indicates the lines to be deleted from a macro (definition) 
when applying a local/APAR fix. 


Description of Operands 


from-line: re 
Specifies the line-number (in columns 73 through 78 in the macro) where deletion if 
begins. The from-line is the first line to be deleted. a 


Default: If omitted, from-line is assumed to be equal to the to-line value. 
This means that only the line designated by to-line is deleted. 


trel: 

Identifies the position of the statement relative to the from-line number and is 
an integer of one or two digits. 

It applies to E- or F-type macros only. 


to-line: 
Identifies the last Tine of the lines to be deleted. The value of to-line must 
be equal to or greater than the value given in from-line. 5 


trel: 

Identifies the position of the statement relative to the to-line number and is 
an integer of one or two digits. 

It applies to E- or F-type macros only. 


f 5 a 
[ Operation | Operands 


po 


EXCLude 


| {PRoduct=(product,...) 
| | COmponent=(component [-level],...) 
{ 


| PT£=(ptf-number,...)}} 


ee bee 


The EXCLUDE statement is used to exclude specific products, components or PIFs : 
from a service application (with the INSTALL SERVICE statement). This a 
implicitly includes service for all other products, components, or PTFs shipped : 
on the tape. 


Description of Operands 


PRoduct=(product,...J: ! 
Specifies the product(s) that are not to be serviced. 


COmponent=(component{[-level],...): 
Specifies the component(s) that are not to be serviced. If level is not 
specified, MSHP excludes all levels of the component. x 


Awe 


PTf=(ptf-number, ...}: 
Lists the PTFs that are not to be installed. 
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T } 
| Operation | Operands | 
= { 
| EXECute | (control—program,...)[Xref|NOXref] | 
L wl } 


The EXECUTE statement is used to indicate which system programs (assembler, 
librarian or linkage editor) are to be called in which order to process the data 
submitted with the TAILOR statement. The data to be processed must immediately 
follow the EXECUTE statement and be terminated by /S. 


Description of Operands 


(control-program,...): 
MSHP calls the specified system program(s) in the submitted order to process the 
data which immediately follows the EXECUTE statement (and is terminated by /$). 


If two programs are specified, the output of the first program is taken as input 
to the second without any modification. 


Any mismatch between the program and the data (for example, an object deck as 
input for ASSEMBLY) is not checked by MSHP, but results in an error situation 
diagnosed by the called program. 


The, following programs or program combinations can be specified: 


bd EXEC ASSEMBLY 
EXEC LNKEDT 

. EXEC ASSEMBLY 
EXEC LIBR 


2 EXEC ASSEMBLY, LNKEDT 
° EXEC ASSEMBLY, LIBR 

© EXEC LNKEDT 

* EXEC LIBR 

Xref: 


Specifies that the cross-reference list of included macros as given by the 
ASSEMBLY program is to be recorded in the history file. 


NOXref: 


Specifies that the cross-reference list of included macros is not to be recorded 
in the history file. 


f 7 71 
| Operation | Operands 

ay Le ; =a | 
| GENerate | {PHAse=member—name |MODule=member—name | 
| | |MACro=member—name [TYpe=member—type] } | 
ahi: | 


The GENERATE statement is used as a detail control statement to the SELECT 
statement to regenerate (retailor) individual phases, modules, or macros from 
the generation file. 


Description of Operands 


PHAse=member- name: 
Indicates to MSHP the name of the phase that is to be regenerated. 


MODule=member- name: 
Indicates to NSHP the name of the module that is to be regenerated. 


MACro=member-name: 
Indicates to MSHP the name of the macro that is to be regenerated. 


TYpe=member-type: 


Indicates the type of the affected macro (can be one character only). 
If the operand is omitted, type E is assumed. 
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Ol —E—— SSE SS 
| Operation | Operands | 


ne ee 
| INCLude | {PRoduct=(product,...) | 
| | {COmponent=(component [—level],...) | 
| | |PT£=(ptf-number,...)} | 
i a es 


The INCLUDE statement is used to indicate to MSHP that only the named products, 
components, or PTFs are to be included in a service application (with INSTALL. 
SERVICE). This implicitly excludes service for all other products, components, 
or PTFs shipped on the service tape. 


Description of Operands 


PRoduct=(product,...): 
Specifies the product(s) to which service is to be applied. 


COmponent=(component[-level],...): 
Specifies the component(s) to which service is to be applied. 


If level is omitted, all levels of the component are serviced. 


PTf=(ptf-number,...): 
Lists the PTFs that are to be applied. 


(ey a ee ee Ip ee ee 


| Operation | Operands { 
| INFluences | {PHAse=(member—name,...)|MODule=(member—name,...) | 
| | |MACro=(member—name,...) [TYpe=member—type] } | 
ee ee 


The INFLUENCES statement identifies which generated phases, modules, or macros 
of the serviced component are affected by a PIF or local/APAR fix and have to be 
regenerated. 


Restriction: One INFLUENCES statement may not refer to more than a total of 100 
phases, modules, and/or macros. 


Description of Operands 


PHAse=(member-name,...): 
Names the phases to be regenerated. 


MODule=(member-name,...): 
Names the modules to be regenerated. 


MACro=(member-name,...): 
Names the macros to be regenerated. 


TYpe=member-type: 
Indicates the type of the affected macro (can be one character only). 
If the operand is omitted, type E is assumed. 


fo nS ee 
| Operation | Operands | 


| INsert | after—line[+trel] | 
ee a I a a ee ee eae 


The INSERT statement identifies where, in a source book (macro), additions are 
to be made when archiving a local/APAR fix or when initiating a local or APAR 
fix by means of the CORRECT statement. The statement further serves as the 
initiating delimiter (with /$ or a blank line being the terminating delimiter) 
for the input line to be inserted. 
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Description of Operands 


after-line: 

Specifies the line number in the macro (in columns 73 through 78) after which 
the source input (following the INSERT statement up to the next /$) is to be 
inserted (1 to 6 digits). 


+rel: 


Specifies the position of the source input relative to the after-line number (1 
or 2 digits). 


Restriction: rel applies to E- or F-type macros only. 


gS) (a Ra SOT TR a EI ET | 
| Operation | Operands | 


| INVolves | LINK=(link-book,...) | 


ed 


The INVOLVES statement explicitly requests link-editing to be performed when 
installing an archived product, or when applying PTFs from a service tape. 


As a detail control statement to APPLY, INCORPORATE, and CORRECT, it indicates 
that, as the final step of the particular function, a link-edit run must be 
performed. 


Description of Operands 


LINK=(link-book,...): 
Link-book specifies the name of a module that is to be included in the link-edit 
step. (1 to 8 characters, the first one must not be an asterisk.) 


If you specify several link-books, the linkage editor includes the named modules 
in the same sequence as they occur in the list. You can specify up to 100 
link-books. 


(PSS Ro te Gy wa ee ee en ee te ee epee YG ae pe ey 


| Operation | Operands | 


$$ 
| OR | no operand | 


a eh lpr 


The OR statement initiates a set of alternative REQUIRES statements that are to 
be checked in case the preceding set of requirements is not met. 


Two or more REQUIRES statements following each other immediately are considered 
to be in an ‘AND’ relation. This means that the REQUIRES check is successful 
only if the prerequisites, corequisites, and negative prerequisites of the whole 
set of REQUIRES statements are met. 


e 
=" ere oS gee oe SS oe Se oe 


| Operation | Operands | 
i eSicnc epee rnteer SOOO ESS foes Rey ace eee 
| PTF | =(ptf-number,...) 


The PTF statement is used as a detail control statement to the LIST SERVICETAPE 
COVER statement to print selected cover letters. 


Description of Operands 


=ptf-number: 
Identifies the PTF whose cover letter is to be printed. 
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| Operation | Operands | 

ataiti a | 
| REPlace {| [{from-line{trel]] : to-line[+trel1] | 
ESE Seer ise aac we ee Pe ee EEE | 


The REPLACE statement is used when applying (CORRECT) or archiving (ARCHIVE) a 
local or APAR fix to define where replacement of lines in a source macro must 
begin and end. 

The replacing data must follow immediately the REPLACE statement and is to be 
terminated by an input line containing /$ in.columns 1 and 2 (or a blank line if 
entered from SYSLOG). 


Description of Operands 

from-line: 

Specifies, by the line-number in columns 73 through 78 in the macro, the first 
line to be deleted and to be replaced by the first (if any) input line. (Input 
refers to data that follows the REPLACE statement.) 

Default: If from-line is not specified, it is assumed to be equal to to-line. 
trel: 

Specifies the position of the line relative to the from-line number 


(1 or 2 digits). 


Restriction: rel applies to E- or F-type macros only. 


to-line: 
Specifies that, beginning with from-line, ail lines in the macro are to be 
deleted up to and including the line indicated by 'to-line'. '‘'To-line' is the 


line-number contained in columns 73 through 78 of the macro to be modified. 
tral: 

Specifies the position of the line relative to the to-line number 

(1 or 2 digits). : 


Restriction: rel applies to E- or F-type macros only. 


———— 


Operation | Operands 
+ 
| 


f 
i 
t 
{ 


Le te eee cn sal 


REQuires [component ] [PRE=req—list] [CO=req—list] [NOT=req—list] 


The REQUIRES statement is used to specify the requirements (such as prerequisite 
PTFs) that must be met to successfully install a shipment package or apply 
service in PTF or local/APAR fix format. 

The specified requirements are entered in the history file that accompanies the 
programming package. 


You may connect several requirements (with an ‘AND' relation) by specifying 
several REQuires statements in succession. 


You can also delimit such a set of REQUIRES statements from a preceding set by 
means of the OR statement. 

If the preceding set of requirements (at least one) fails, MSHP tests the set of 
requirements initiated by OR. 

If that test is successful, all requirements are considered to be met. 


Restrictions: The number of requirements per PTF, local/APAR fix, component, or 


product specified in one or more REQUIRES statements must not exceed 88. 
At least one of the operands PRE=, CO=, or NOT= must be present. 
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Description of Operands 


component: 

If the requirements specified in the req-lists are PIFs or local/APAR fixes, 
then component specifies the component to which the PTF or local/APAR fix 
belongs. 


Default: If component is omitted, then the PTFs or local/APAR fix(es) specified 
as requirements are assumed to belong to the component to which the "requiring" 
PTF or local/APAR fix is applied. 


Restrictions: Component must not be specified if the requirement in a req-iist 
is neither a PTF nor a local/APAR fix. 

Component must aiways be specified if REQUIRES is used in conjunction with the 
ARCHIVE statement. 


PRE: 
Indicates that the requirements specified in the req-list have to be installed 
prior to the requested service application or installation function. 


A prerequisite condition is also considered as being met if a prerequisite PTF 
has been superseded by another, installed PTF. 


co. 
Indicates that the requirements specified in the req-list have to be applied 
together with the requested service application or installation function. 


If REQUIRES is used as a detail control statement to CORRECT, CO= indicates that 
the requesting local/APAR fix will be applied even though the requirements 
specified in the req-list are not met; however, MSHP issues a warning message. 


NOT: 
Indicates that the requirements specified in the req-list must not be installed 
prior to the requesting service application or installation function. 


req-list: 
A 'req' is one of the following: 


e PTF number or local/APAR fix number 
component [-level] 
* product for old feature number) 


Restriction: In a requirements list, all items must be of the same type: PTF 
numbers, APAR numbers, components, and products may not be mixed. 


1 ' 
| Operation ! Operands | 
| {—— : 
| RESolves | ['comment']{APARs=(apar~-number,...)] 

t 2 


The RESOLVES statement associates a comment with a product, a PTF, a local/APAR 
fix. or a generated member: it is also used to indicate which APARs are fixed bv 
a PTF. 


Restriction: Only one comment per associated product (or fix or member) can be 
recorded in the history file. 

If more than one RESOLVES 'comment' statement is specified, the last one will be 
recorded. 


Description of Operands 


‘comment’. 
Specifies that a comment re 


lating to a PTF. a local/APAK fix. a product. or a 
generated member is to be insert 


rted in the history file. 
ine maximum iengih is s5 cnaracters if Ene comment is aSsociatea witn a 
locai/APAK fix; it is 37 for any other comment tenciosed in quotes). 
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APARs=(apar-number,...): 
Specifies the APAR number(s) corrected by a given PTF. 


Restrictions: 


¢ This operand must be specified in a RESOLVES statement that relates to a PTF 
(RESOLVES being used in conjunction with ARCHIVE PTF and APPLY 
component : ptf-number). 

¢ The maximum number of APARs that can be specified in one RESOLVES statement 
is 100. 


en a ee ee 
| Operation | Operands | 


| RESTart | restart-line[+rel] | 
se i cS a ee ee) 
The RESTART statement is used for the correction of edited macros (with the 
CORRECT statement). It indicates that a new sequence number series starts after 
the specified statement. 
Description of Operands 
restart-line: 
Specifies the sequence number of the statement after which the new sequence 


number series starts. 


trel: 
Specifies the position of the desired statement relative to 'restart-line’. 


fost igee ces ge i rh st te vil 


| Operation | Operands | 
| SCan | [offset] [ARGument= 'char—string' |hex-string}] | 
, RR seer a aver mee SNES OAS AU CTY I 1) FE nS 5 79 PS A, hy NPE PEON 


The SCAN statement is used when correcting a phase from the console (after 
AFFECTS PHASES=...} to search for a specified string in a phase and to display 
16 bytes of the phase. 


Description of Operands 


offset: 

Specifies the displacement (relative to the beginning of the phase) where, in 
the phase, the search for the specified ARGUMENT string is to be started. If 
the ARGUMENT=string operand is omitted, MSHP displays 16 bytes of the phase, 
starting at 'offset'. 'offset' is a number of up to six hexadecimal digits; 
leading zeros may be omitted. 


ARGument=[‘char-string'|hex-string]: 
Specifies the string that is to be searched in the phase. It can be in one of 
the following formats: 


° A string of 1 to 16 characters, enclosed in quotes, where each character 
represents one byte in the phase. 

e An even string of 2 to 32 hexadecimal digits, where each pair of hexadecimal 
digits describes one byte in the phase. 
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The table shows the results of specifying the two operands ‘offset' and 
"ARGUMENT' in various combinations. 


[Re eS ee eed as 1 cing) gig wt. eae. a ee Poe ee a 
| Joffset | ARG | Result | 
a ee 


First scan 
after 
AFFECTS PHASES 


| | | Invalid; error message. | 
| | | Scanning for specified string from | 
| | | offset 0. | 
| «x | - | Display of 16 bytes from specified | 
| | | | 
i | | | 
| | | | 


x 


offset. 
Scanning for indicated string from 
specified offset. 


x x 


Subsequent 
scan 


Scanning from current offset for | 
old argument string, which must be | 
.known from preceding scan request. | 
x Scanning for specified string from | 
current offset. | 
x Display of 16 bytes from specified | 
offset. | 
Scanning for indicated string from | 

| 


specified offset. 


x 


| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 
| | 


Pe ee ee eee me ee eg gp ee es ee ee ee ee, 
| Operation | Operands | 
is sai eee ee ee 
| SUPersedes | (ptf—number,...) | 


a 


The SUPERSEDES statement identifies which PTFs are superseded by a given PTF 
when that PIF is being built. 

MSHP requires the list of superseded PTFs to be complete. 

For example: If PTF2 supersedes PTF1, and subsequently a PTF3 is issued that 
supersedes PTF2, then PTF3 must be specified as also superseding PTF1. 


Description of Operands 


(ptf-number,...): 
Specifies the PTF(s) that are superseded. 


Restriction: The maximum number of PTFs that can be specified as superseded 
one SUPERSEDES statement is 100. The total number that can be specified is 2 


Poe i ee ee ce gy ee ee 


| Operation | Operands | 
| VERify | verify—-line[+rel]} | 
a 


The VERIFY statement designates where, in a source book, a verification is t 
made for a local or APAR fix correction. 

The VERIFY statement must be followed by a single line of text. 

MSHP checks whether this text is present in the statement indicated by 
"verify-line'. 


Description of Operands 

verify-line: 

Specifies the sequence number of the source statement to be verified (1 to 6 
decimal digits). 

rel: 

Specifies the position of the desired statement in relation to the statement 


number indicated for verify-line (1 or 2 digits). 


Restriction: rel applies to E- or F-type books only. 
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Appendix A. Return Codes 


A-i 
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Job Control Return Codes 


Return Codes from $JOBEXIT 


R15: zero = continue processing 
not zero = treat statement as comment 


Note: If R5 is not zero, the 80-byte long continuation card(s) is (are) 
located adjacent to the 80~byte long statement. 


Return Codes from Phase $IJBASGN in Register 15 


00 - Assignment successful 

04 - No free LUB entry found 

08 - Device cuu not found in PUB table 

oc - Device cuu is not a disk 

10 - Device cuu is down 

18 - No free tape unit found 

1C - Invalid logical unit for unassignment 

20 - Device reserved by volume statement or by mount request 
from another partition 

24 - Invalid function code 

28 - No GETVIS space available 

2C - Device to be unassigned is not assigned 


Return Codes form Phase $IJBCJC in Register 15 


00 - Function successfully executed 
04 - Wanted information not available 
08 ~- Invalid parameter field 

OC - No GETVIS space available 


Return Codes from Phase IJBPROC in Register 15 


1. If called by macro PARMMAC 


00 - Request was successful 

08 - Invalid length in LENFLD 

OC - Invalid pointer for a buffer parameter 

10 - Parameter not defined in GETVAL-request 

14 - SETPDF-request occurred twice 

18 - SETPDF-request occurred after second GETREC 
1C - Space block chain exhausted 

20 - No system GETVIS space available 

2C - No partition GETVIS space available 

40 - Invalid function 


2. If called by macro PROCMAC 


00 ~ Request was successful 

04 - Procedure not found 

08 - EOPREQ was given on level 0 

OC - GETREC was given on level 0 

10 - ACCESS exceeds nesting level of 15 

14 - Duplicate procedure name in nested stack 
18 ~ Request outside member 

1¢ - Invalid pointer to buffer 

20 - No system GETVIS space available 

24 - Librarian error 

28 ~- Conflict in nested stack related to DATA=YES/NO option 
2C - No partition GETVIS space available 

30 - Error in LABEL request 

34 - Partition FREEVIS failed 

40 - Invalid function 
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Librarian Return Codes 


Or ei neste thease requested function successfully completed 
4, 8, 12 .... function-specific exceptional conditions 
D6 settee ees external error (e.g. system resources exhausted, 


invalid parameter list when called) 


20) osieardidess internal error (e.g. processing consistency 
check failed) 


32 Sew tases security violation 


36. ay edueeites library chaining error (library block identification 
number changes within a chain) 


Additional to return codes 16 and 20, a feedback code is returned in the 


corresponding parameter list (usually in the LRPL) denoting the reason for the 


failure. 


Return codes which are equal or greater than 16 are accompanied by a message 
which is returned in the message area for SYSLST and SYSLOG and printed or 


logged according to the message routing indicator if the corresponding DTFs are 


provided via the LAMB. If neither DTFs nor message areas are specified in the 


LAMB, only the message number is returned in the LAMB. 


Linkage Editor Return Codes 
00 - Successful completion 
04 - Warning or error message issued, but phases are cataloged 
16 - Severe error occurred, phases are not cataloged 
For return code 0 one of the following warning messages might occur: 
* ROOT STRUCTURE OVERLAID BY SUCCEEDING PHASE 
. POSSIBLE INVALID ENTRY POINT DUPLICATION IN INPUT 
‘ INVALID TRANSFER LABEL ON END OR ENTRY STATEMENT IGNORED 
° CONTROL SECTION OF ZERO LENGTH IN INPUT 
and message 21391 
For return code 4 one of the following error messages did occur: 
« One of the messages 2100I through 21701 (except 21391) or 
2 ** MODULE xxxxxxxx NOT FOUND or 
¢ UNRESOLVED EXTERNAL REFERENCES 
° and messages 21871 and 21991 
For return code 16 one of the following error messages did occur: 
° One of the messages 2180I through 2197I (except 21871) or 


* a librarian message LxxxI. 
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1287 - Optical Reader 


Sense Byte Designation 
0 BitO: command reject 


1: intervention required 
2: bus-out check 
3: equipment check 
4: data check 
5: overrun 
6: non-recovery 
7: keyboard correction (tape only) 
1 BitO: tape mode 
1: late stacker reset 
2: no document found 
33S 
4: invalid option 
53.35 
63 .5= 
ye 
1288 - Optical Reader 
Sense Byte Designation 
0 BitO: command reject 
1: intervention required 
2: bus-out check 
3: equipment check 
4: data check 
5: overrun 
6: non-recovery 
Leo 
1 Bit0: -- 
1: end-of-page 
2: no document found 
i eee ie 
4: invalid option 
af Ss 
6: -- 
yaa 
1403 - Printer 
Sense Byte Designation 
0 BitO: command reject 
1: intervention required 
2: bus-out check 
3: equipment check 
4: data check 
5: parity check (UCS storage) 
6: -- 
7: channel 9 
1 Not used 
2 BitO: chain interlock 
1: forms check 
2: coil protect check 
3: subscan ring check 
4: chain buffer address register check 
55022 
6: any hammer on check 
7io-- 
3 Not used 
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J 1403 - Printer (cont....) 


of Sense Byte 
4 


1419 - PCU-MICR 


Sense Byte 
0 


1419 - SCU-MICR 


Sense Byte 
0 


Designation 
Bito: 
: no fire check 


hammer reset failure check 


misfire check 


: print data buffer parity check 


check bit buffer parity check 


: chain buffer parity check 
: buffer address register parity check 


clock check 


: open hammer coil check 


Designation 
BitO: command reject 


NOU WDNR 


intervention required 
bus-out check 


data check 


: overrun 
: autoselect 


BitO-1: -- 


NADU PWD 


: document under read head 


amount field valid 


: process-control field valid 


account-number field valid 


: transit field valid 


serial-number field valid 


Designation 


BitO: command reject 
1: intervention required 
2: bus-out check 
3-4: -- 
5: late stacker select 
6: autoselect 
7: operator attention 


1442 - Card Read-Punch/Card Punch 
Designation 


Sense Byte 


0 


1443 - Printer 


Sense Byte 


0 


Bito: 


AUF WH HE 


command reject 
intervention required 
bus-out check 
equipment check 

data check 

overrun 


-7: -- 


Designation 


Bito: 


2260 - Display Station 
Designation 


Sense Byte 


0 


BitO 


DU kwWNH 


command reject 
intervention required 
: bus-out check 

: equipment check 

: type bar 

: type bar 

“7: -- 


: command reject 
intervention required 
: bus-out check 

; equipment check 
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2311 - Disk Storage 
Sense Byte 


uv 


Designation 


BItv: 


commana reject 
intervention required 


: bus-out check 

: equipment check 

: data cneck 

>: overrun 

: track condition eheck 


seek check 


: data check in count area 
: track overrun 


end of cylinder 
invalid sequence 


: no record found 


tile protect 


: missing address marker 
: overflow incomplete 


: unsafe 


serializer check 
ALU check 
unselected file status 


ready 

online 

unsafe 

online 

end of cylinder 


seek incomplete 


BitO-7: -- 
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BitO-7: command in progress when overflow 


incomplete occurs 


2314/2319 - Direct Access Storage 


Sense Byte 
QO 


Designation 


Bito: 


command reject 
intervention required 


: bus-out check 
: equipment check 


data check 


: overrun 
: track condition check 


seek check 


data check in count area 


: track overrun 


end of cylinder 
invalid sequence 

no record found 

file protect 

missing address marker 
overflow incomplete 


: unsafe 


SERDES check 


: ALU check 


unselected file status 


B-4 IBM VSE/Advanced Functions Handbook 


j 
4 


i 


pe OS 


rh 
‘2 
\ 


RS 


ME 


¢ 


Licensed Material - Property of !BM 


© Copyright IBM Corp. 1985 


2314/2319 - Direct Access Storage (cont....) 


Sense Byte 
3 


2400 - Magnetic Tape 


Sense Byte 
0 


Designation 
Bito: 
: online 


busy 


unsafe 

write current sense 
pack change 

end of cylinder 
multy-module select 
seek incomplete 


: wrong length record (2314 with multi- 


plex storage control feature only) 


: pending status (2314 with multiplex 


storage control feature only) 


Module identification 


bits 4567 physical drive 
0000 A 0001 B 0010 
C 0011 D 0100 E 0101 
F 0110 G 0111 H 1000 
J 1111 module not defined 


BitO-7: command in progress when overflow 


incomplete occurs 


Designation 


Bito: 


SNOW FW 


BitoO-7: 


Bito: 


SOME WD be 


NDUFWDNH 


command reject 
intervention required 
bus-out check 
equipment check 

data check 


> overrun 


word count zero 


: data converter check 


: noise 


B'00'= not existent 

B'O1'= not ready B'10'= ready and not rewinding 
B'11'= ready and rewinding 

seven track 

at loadpoint 

selected and write status 

file protect 


: not capable 


contains the track-in-error indicator 

bits that are set at the end of a read, or 
read-backward command if a data check has been 
encountered. Bits 6 and 7 on together indicate 
either more than one error or no record found. 


R/W VRC 

LRCR 

skew 

CRC 

skew register VRC 


: phase encoding 


backward 
C compare 
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2400 - Magnetic Tape (cont....} 


Sense Byte Designation 
4 BitO: echo check 
1: reject TU 
2: read clock error 
3: write clock error 
4: delay counter 
5: sequence indicator C 
6: sequence indicator B 
7: sequence indicator A 
2501 - Card Reader 
Sense Byte Designation 
0 BitO: command reject 
1: intervention required 
2: bus-out check 
3: equipment check 
4: data check 
5: overrun 
6: -- 
Toss 
2520 - Card Read~-Punch/Card Punch 
Sense Byte Designation 
0 BitO: command reject 
1: intervention required 
2: bus-out check 
3: equipment check 
4: data check 
5: overrun 
6: -- 
Tis 
2540 - Card Reader/Card Punch 
Sense Byte Designation 
0 BitO: command reject 
1: intervention required 
2: bus-out check 
3: equipment check 
4: data check 
5: -- 
6: unusual command 
73 => 
2560 - Multifunction Card Machine 
Sense Byte Designation 
¢) BitO: command reject 
1: intervention required 
2: -- 
3: equipment check 
4: data check 
5: feed/Machine check 
6: no card available 
7: print operation in progress 
1 BitO: cover interlock/punch pusher check 
1: jam bar check 
2: corner station check 
3: call 8 to 9 feed check 
4: print station feed check 
5: punch station feed check 
6: read station feed check 
7: input station SCl exposed 
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2560 - Multifunction Card Machine (cont....) 


Sense Byte Designation 
2 Location of individual card: 
BitO: secondary select 
1: card in punch station 
2: preprint SC7 exposed 
3: prepunch SC5 exposed 
4: prepunch SC4 exposed 
5: preread SC3 exposed 
6: preread SC2 exposed 
7: input station SC1l exposed 
2 Stacker Select Information 
BitO: primary card 0 ) 
1: binary value 4 ) card at primary 
2: binary value 2 ) prepunch station 
3: binary value 1 ) 
4: secondary card 1 ) 
5: binary value 4 } card at secondary 
6: binary value 2 )} prepunch station 
7: binary value 1 ) 
4 Stacker Select Information 
BitO: primary (0) ) 
secondary (1) ) 
1: binary value 4 )} card at punch or 
2: binary value 2 ) preprint station 
3: binary value 1 ) 
4: primary (0) ) 
secondary (1) ) 
5: binary value 4 ) card after print 
6: binary value 2 ) station 
7: binary value 1 ) 
5 Stacker Select Information 
BitO: primary (0) ) 
secondary (1) ) 
1: binary value 4 ) card at corner 
2: binary value 2 } station 
3: binary value 1 ) 
4: primary (0) } 
secondary (1) ) 
5: binary value 4 ) card in stacker pocket 
6: binary value 2 ) (was just stacked) 
7: binary value 1 ) 
6 Card column in which first (possibly only) 
error was detected: 
BitO: multi data check 
1: binary value 64 
2: binary value 32 
3: binary value 16 
4: binary value 8 
5: binary value 4 
6: binary value 2 
7: binary value 1 


2596 - Card Read-Punch 
Sense Byte 


SMO EWN 


Designation 
0 Bito: 


command reject 
intervention required 


: bus-out check 


equipment check 
data check 
overrun 
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3203 + Printer 


Sense Byte Designation 

0 BitO: command reject 
1: intervention required 
2: °° 
3: equipment check 
4; data check 
5: chain buffer parity check 
6: no channel found 
7: channel 9 

1 BitO-7: -- 

2 BitO: interlock (chain gate open) 
1: forms check (jam) 
2: coil protect check 
3: subscan ring check 
4: chain buffer address register check 
5: hammer unit shift check (model 1 only) 
6: any hammer on check 
7: device ready check 

3 Bit 0: -- 
bes 
Zio 
3: carriage inhibit check 
Ai 
Sy es 
6: step check 
7: move check 

4 BitO: hammer reset failure check 
1: no fire check 
2: misfire check 
3: print data buffer parity check 
4: check bit buffer parity check 
5: chain buffer parity check 
6: buffer address register check 
7: clock check 

5 BitO: open coil check 

L765 
3210/3215 - Console Printer Keyboard 

Sense Byte Designation 

Q BitO: command reject 
1: intervention required 
23 35 
3: equipment check 

4-7: -- 
PRT1 (3203-4 ,3203-5,3211,3289 ,4248) 
Sense Byte Designation 
0 BitO: command reject 


NADU PF WNH PE 


NDE WON HE 


intervention required 
bus-out check 
equipment check 

data check 


: buffer parity check 


load check 
channel 9 


command parity 
print check 


: print quality 


line position check 
forms check 


: command suppress 


mechanical motion 
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PRT1 (3203-4 ,3203-5,3211,3289,4248) (cont....) 


Sense Byte 
2 


3272 - (3270 Local) 


Sense Byte 
0 


Designation 
BitO: carriage failed to move 


carriage sequence check 
carriage stop 

platen failed to advance 
platen failed to retract 
forms jam 

ribbon motion 

train overload 


NDOP WD 


Bit 0: UCSB parity 

: PLB parity 

: FCB parity 

coil protect 
hammer fire check 
service aid 
UCSAR sync check 
PSE sync check 


NM OMNFWDN 


BitO-7: information used by service personnel 


BitO-7:; -- 


Designation 
BitO: command reject 


intervention required 
bus-out check 
equipment check 

data check 

unit specify 

control check 
operation check 


SNOOP WDM 


FBA (3310 and_ 3370) Disk Storage 


Sense Byte 
0 


3-6 


Designation Format 
BitO: command reject 

1: intervention required 1 

2: bus-out parity (not used) 0 

3: equipment check 1 

4: data check 4 

5: overrun 0 

6: (unused) - 

7: (unused) = 
BitO: permanent error any 


1: (unused) - 
2: Cunused) - 
3: (unused) - 
4: (unused) - 
5: file protected 0 
6: write inhibit = 
7: operation incomplete 0 


BitO: check data error 4 
correctable 5 
2: Cunused) - 
3: environmental data present 6,4,1 
4: (unused) - 
5: (unused) - 
oe: (unused) - 
7: only logging required = 


physical address 


BitO-3: hex: format number 
4-7: hex: message code 


only for diagnose information 
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3330 ~- Disk Storage 


3340 - Disk Storage 
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Sense Byte 
¢) 


8-23 


Sense Byte 
0 


Designation 


Bito: 


ry 


command reject 
intervention required 


: bus-out check 


equipment check 
data check 


>: overrun 


: permanent error 


invalid track format 
end of cylinder 


: no record found 


file protected 


: write inhibited 
: operation incomplete 


correctable 


environmental data present 


BitO-7: restart command 


BitO-1: storage control identification 
2-7: physical drive identification 


BitO-7: 


IBM Corp. 1985 


bits 4567 _ physical drive 
111000 A 110001 B 101010 
C 100011 D 011100 E 010101 
F 001110 G 000111 H 
identify the eight low-order bits of 
the cylinder address in the most recent seek 
argument 
reserve 
cylinder number (high order bit of 


cylinder address) 


: difference 


16 ) 
8 ) 
4 ) head number 
2) 
1) 


BitO-3: format type of remaining sense bytes (8-23) 
4-7: encoded error message 


Meaning depends on format type 


Designation 


Bit0O: 


NDOP WDHB 


command reject 
intervention required 


: bus-out check 

: equipment check 

: data check 

: overrun 

: track condition check 


seek check 
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3340 - Disk Storage (cont....) 
Sense Byte Designation 
1 BitO: permanent error 
1: invalid track format 
2: end of cylinder 
2 a 
4: no record found 
5: file protected 
6: write inhibit 
7: operation incomplete 
2 BitO: RPS feature present 
1: correctable 
22555 
3: environmental data present 
4: -- 
5: data module size 70F Fixed Head 
6: data module size 70MB 
6: data module size 35MB 
3 BitO-7: restart command 
4 Physical drive identification 
BitO: drive A 
1: drive B 
2: drive C 
3: drive D 
4: drive E 
5: drive F 
6: drive G 
7: drive H 
5 BitO-7: identifies the eight low-order bits 
of the cylinder address in the most recent seek 
argument 
6 BitO-2: identifies the three high-order bits 
of the cylinder address 
is Fe 
4: 8) 
5: 4 ) head number 
6: 2) 
Te 89 
7 BitO-3: format type of remaining sense bytes (8-23) 


4-7: encoded error message 
8-23 Meaning depends on format type 


3344 - Disk Storage (3340 Mode) 


Sense Byte Designation 
0 BitO: command reject 


1: intervention required 
2: bus-out check 
3: equipment check 
4: data check 
5: overrun 

6: track condition check 
7: seek check 


1 BitO: permanent error 
: invalid track format 
end of cylinder 


file protected 
: write inhibit 


1 

2 

3: 

4: no record found 

5 . 

6 

7: operation incomplete 
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3344 - Disk Storage (cont....) 


Sense Byte Designation 
2 BitO: RPS feature present 
1: correctable 
2006= 
3: environmental data present 
4: Compatibility mode / 3344 
5: HDA size 3 bit 
6: HDA size 2 bit 
7: HDA size 1 bit 
3 BitO-7: restart command 
4 Controller device address 
BitO: Controller addr. bit 2 
1: Controller addr. bit 1 
2: ) 
3: ) Controller Device Address 
4: ) 
5: Device addr. bit 4 
6: Device addr. bit 2 
7: Device addr. bit i 
5 BitO-7: identifies the eight low-order bits 
of the cylinder address 
6 BitO-3: identifies the four high-order bits 
of the cylinder address 
0: 1024 
Pe 512 
2'> 256 
3: 2048 
4: 8 ) 
8: 4 ) head number 
6: 2 ) 
7: 1. 3 
7 BitO-3: format type of remaining sense bytes (8-23) 
4-7: encoded error message 
F223 Meaning depends on format type 


3350 - Direct Access Storage 


Sense Byte 

1 Bito: 
1: 
Ze 
3: 
4: 
52 
6 
Jee 

1 BitoO 
1: 
2: 
3. 
4: 
5: 
6: 
7 

2 Bito: 
ne 
2: 
3: 
4: 
52 
6: 


Designation 


command reject 
intervention required 
channel bus-out parity 
equipment check 

data check 

overrun 


: not used 


not used 


: permanent error 


invalid track format 
end of cylinder 

not used 

no record found 

file protected 

write inhibit 
operation incomplete 


not used 

correctable 

not used 

environmental data present 
computability mode 

not used 
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a ; 3350 - Direct Access Storage (cont....) 


Sense Byte 


Designation 


i i : 


4 


8-23 


3370 Disk Storage 


Sense Byte 
0 


BitO-7: restart command 


Physical drive identification 


BitO: drive A 
1: drive B 
2: drive C 
3: drive D 
4: drive E 
5: drive F 
6: drive G 
7: drive H 
BitO-7: low order logical cylinder address 
0: 128 
1: 64 
2: 32 
3: 16 
4: 8 
S: 4 
6: 2 
7 as 1 


BitO-2: identifies the three high-order bits 
of the cylinder address 
BitO: CE cylinder 


1: 3330-11 = 512 
3330- 1 = 256 
2: 3330-11 = 256 
3330- 1= 0 
ei 16 ) 
4: 8 ) 
5s 4 ) head number 
6: 2) 
qe 1) 


BitO-3: format type of remaining sense bytes (8-23) 
4-7: encoded error message 


Meaning depends on format type 


Designation Format 
BitO: command reject 


1: intervention required 1 
2: bus-out parity (not used) 0 
3: equipment check 1 
4: data check 4 
5: overrun 0 
6: (unused) = 
7: Cunused) - 


BitO: permanent error any 
1: block size exception : - 
2: (unused) - 
3: operator message - 
4: (unused) <i 
5: file protected 0 
6: write inhibit - 
7: operation incomplete 0 


BitO: check data error 4 

correctable 5 
first logged error (logging mode) - 
: environmental data present 6 
Cunused) - 
(unused) - 
Cunused) - 
(unused) - 


NOON PP WNP 
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3370 Disk Storage (cont....) 


Sense Byte Designation Format 
3 BitO-7: identifies the high-order cylinder 


address of the most recent seek 


4 BitO-7: identifies the low-order cylinder 
address of the most recent seek 


5 BitO-7: head address, IAR, or diskette check 
6 BitO-7: block no., IAR, or storage director ID 
7 BitO-3: hex: format number 


4-7: hex: message code 
8-23 only for diagnose information 


3375 Disk Storage 


Sense Byte Designation 
0 BitO: command reject 
1: intervention required 
2: channel bus-out parity 
3: equipment check 
4; data check 
5: overrun 
6: not used 
7: not used 
1 BitO: permanent error 
1: invalid track format 
2: end of cylinder 
3: message to operator 
4: no record found 
5: file protected 
6: write inhibit 
7: not used 
2 BitO: not used 
1: correctable data check 
2: first logged error (logging mode) 
3: environmental data present 
4: intent violation (speed matching buffer) 
5: imprecise ending (speed matching buffer) 
6: not used 
7: not used 
3 BitO-7: controller identification 
4 BitO: dual controller 


1: not used 
2: not used 
3-4: controller physical address 


Bits 3 4 address 
00 0 
Ol 1 
10 2 
11 ame 

5-7: device physical address 

Bits 5 6 7 actuator module 
000 0 1 
001 1 1 
010 2 2 
oll 3 2 
100 4 3 
101 5 3 
110 6 4 
111 7 4 

5 BitO-7: format 1,4,5 - low cylinder address 


0-7: format 6 - number of diskette checks 
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3375 Disk Storage (cont...) 


Sense Byte Designation 
6 BitO-7: format 1,4,5 - high cylinder/head address 


0-7: format 6 - storage control identification 


7 Bit0O-3: format 
4-7: message code 


8-23 Meaning depends on format type 


3380 Disk Storage 


Sense Byte Designation 
0 BitO: command reject 


1: intervention required 
2: bus-out parity 
3: equipment check 
4: data check 

5: overrun 

6: not used 

7: not used 


1 BitO: permanent error 
1: invalid track format 
2: end of cylinder 
3: message to operator 
4: no record found 
5: file protected 
6: write inhibit 
7: not used 


2 BitO: not used 
1: correctable data check 
2: first logged error (logging mode) 
3: environmental data present 
4: intent violation 
5: imprecise ending 
6: write operation 
7: not used 


3 Controller ID if format 1, 2, 6, 7, 8 
not used for format 0, 3, 4, 5 
BitO: logical address of the controller 
1-6: not used 
7: indicates A2 controller 


4 BitO: indicates dynamic path selection function 
1: not used 
2: logical path error 
3: not used 
4-7: device address 


5 BitO-7: cylinder-low address 
6 BitO-7: cylinder-high and head 
Cylinder address Head address 
= 0 4= 8 
= @) S= & 
= 512 6= 2 
= 256 7= 1 
7 BitO-3: hex: format number 
4-7: hex: message code 
8-23 only for diagnose information 
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3410/3411 ~- Magnetic Tape 
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multiple track error (PE) or LRC (NRZI) 


Sense Byte Designation 
0 BitO: command reject 
1: intervention required 
2: bus-out check 
3: equipment check 
4: data check 
5: overrun 
6: word count zero 
7: data converter check 
1 BitO: noise 
1-2: B'OO'= not existent 
B'O1'= 
ready and busy 
3: seven track 
4: at loadpoint 
5: write status 
6: file protected 
7: not capable 
2 BitO-7: track-in-error bits 
3 BitO: VRC 
1: 
2: skew 
3: end data check (PE) or CRC (NRZI) 
4: envelope check (PE only) 
5: phase encoding 
6: backward 
, et 
4 BitO: tape unit positioning check 
1: tape unit reject 
2: end of tape 
38 8 
Arise 
5: diagnostic track check 
6: tape unit check 
7: illegal command 
5 BitO: new subsystem 
1: new subsystem 
2: write tapemark check 
3: PE identification burst 
4: PE compare 
5: tachometer check 
6: false end mark 
7: RPQ 
6 BitO: seven track 
1: short gap mode 
2: dual density 
3: NRZI density 
4-7: tape unit model 
7 BitO: lamp check 
1: left column check 
2: right column check 
3: ready reset 
4: data security erase 
a Als 
8 BitO: -- 
1: feedthrugh 
2: -- 
3: end velocity check 
4: no read-back data 
5: start velocity check 
6: -- 
7: -- 
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\ y 3420/3803 - Magnetic Tape 


Sense Byte Designation 
0 BitO: command reject 


1: intervention required 
2: bus-out check 
3: equipment check 
4: data check 
5: overrun 

6: word count zero 

7: data converter check 


dl 1 BitO: noise 


1-2: B'OO'= not exist. B‘10' 
B'01'= not ready B'll' 
3: seven track 
4: at loadpoint 
5: write status 
6: 
7 


ready and not rew. 
ready and rew. 


oa 


file protected 
: not capable 


2 BitO-7: track-in-error bits 


ae 3 BitO: VRC 
1: multiple track error (PE) or LRC (NRZI) 
2: skew 
3: end data check (PE) or CRC (NRZI) 
4: envelope check (PE only) 
5: phase encoding 
6: backward 
7: C-compare 


4 BitO: ALU hardware error 
1: reject tape unit 
2: tape indicate 
3: write trigger VRC 
4: microprogram detected error 
5: LWR 
6: tape unit check 

7: RPQ 


5 BitO: new subsystem 
1: new subsystem 
2: write tapemark check 
3: PE ID burst check 
4: start read check 
5: partial record 
6: excessive postable or tape mark 
7: RPQ 


6 BitO: seven track 
——w" 1: write current failure 
2: dual density 
3: NRZI density 
4-7: tape unit model 


7 BitO: lamp failure 
1: tape bottom left 
2: tape bottom right 
3: reset key 
4: data security erase 
5: erase head 
6: air bearing pressure 
7: load failure 


8 BitO: IBG drop while writing 
1: feedthrugh check 
2: SDR counter 
3: early begin readback check 
4: early ending readback check 
5: slow begin readback check 
6: slow ending readback check 
7: velocity retry/restart 
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3420/3803 - Magnetic Tape (cont....) 
Designation 


B-18 


Sense Byte 
9 


10 


11 


12 


13 


14 
15 
16 
17 


18 


19 


20 


BitO: SDR counter 
1: velocity change during write 
2-3: SDR counter 
4: -- 
5: *- 
6: =- 
7: tape control reserved 
BitO: command status reject 
Lt) os 
2: control status reject 
3: no block on record readback check 
4: WIM no detected block 
5: tachometer start fail 
6: -- 
7: velocity check 
BitO: B bus parity error, ALU 1 
1: -- 
2: low ROS parity/low IC/parity on br. instr. 
3: high IC/high ROS reg parity 
4: microprogram detected hardware error 
5: D bus parity error, ALU 1 
6: -- 
7: branch condition error, ALU 2 
BitO: B bus parity error, ALU 2 
Leos 
2: low ROS parity/low IC/parity on br. instr. 
3: high IC/BC/high ROS reg parity 
4: microprogram detected hardware error 
5: D bus parity error, ALU 2 
6: -- 
7: branch condition error, ALU 2 


. 


BitO-1: tape control desity 
2-7: tape control unique ID high 


BitO-7: tape control unique ID low 


BitO-7: tape unit unique ID 


BitO-7: tape unit unique ID 


BitO: two channel switch 
1-3: tape control device switch features 
4-7: EC level of tape control 


BitO: power check/air flow 
Basis A= 
4-7: EC level of tape unit 


Bit 


NOAM EWN FO 


: primed for device end unit 


primed for device end unit 
primed for device end unit 
primed for device end unit 
primed for device end unit 
primed for device end unit 
primed for device end unit 
primed for device end unit 


OCOrPRrNWHEUDAN 


primed for device end unit 
primed for device end unit 
primed for device end unit 
primed for device end unit 
primed for device end unit 
primed for device end unit 
primed for device end unit 
primed for device end unit 


ovurw aw my 
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‘age 3420/3803 - Magnetic Tape (cont....) 


Sense Byte Designation 
21 BitO: load button depressed 


1: left reel turning 
2: right reel turning 
3: tape present 

4: reels loaded 

5: load rewind 

6: load complete 

7 


load check 
od 22 BitO-7: FRU identifiers for tape control 
23 BitO-7: FRU identifiers for tape control 


Note: Some bits may have different meaning depending on the model. 


3430 - Magnetic Tape 


Sense Byte Designation 
0 BitO: command reject 


1: intervention required 
2: bus-out check 

3: equipment check 

4: data check 
5 
6 
7 


: overrun 
: word count zero 
always zero 


1 BitO: noise 
1-2: B'0O'= not present 
B'O1'= not ready B'10'= ready and not rewinding 
B'11'= ready and rewinding 
3: always zero 
4: beginning of tape 
5: write status 
6: file protected 
7: not capable 
2 Bit0O-7: track-in-error bits 
3 BitO: VRC 


1: multiple track error 

2: skew 

3: end data check/GCR/CRC check 
4: envelope check (PE/GCR mode) 
5: 
6 

7 


1600 BPI 
: backward 
: write tape mark check 


4 BitO: BOT failure 

1: tape unit reject 

2: end of tape (EOT) 

3: vacuum failure 

4: power driver failure 

5: LWR check 
6: tape unit positioning check 
7: no readback data 


‘ 5 BitO: new subsystem 

1: new subsystem 

2: control unit 4 check 
3: ID burst check 

4: control unit 1 

5: control unit 3 

6: false end mark 

7: tachometer check 


6 BitO-7: fault symptom code (FSC) 
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3430 - Magnetic Tape (cont....) 


Sense Byte 
7 


3505/3525 - Card 1/0 


Sense Byte 
0 


2-3 


3540 - Diskette 


Designation 
BitO-3: FSC pointer 

4: data security erase 
: write/erase head check 
: nonreportable checks 
capstan direction 


SON UT 


BitO: load failure 
1: short gap mode 
2: force log mode 
3: velocity check 
4: reserved 
5: control unit 2 
6: left column check 
7: right column check 


Designation 
BitO: command reject 


1: intervention required 
2: bus-out check 
3: equipment check 
4: data check 
5: ow 

6: abnormal format reset 
7: permanent error key 


BitO: permanent error 
1: automatic retry 
2: motion maifunction 
3: retry after intervention complete 
4-72 32 


Used for diagnostic purposes only 


Designation 
BitO: command reject 


1: intervention required 
2: bus-out check 

3: equipment check 

4: data check 

5-75) <5 


BitO: permanent error 

: automatic retry 

motion malfunction 

retry after intervention complete 
special record transferred 

ey Eee 


UP WON Re 


Used for diagnostic purposes only 
BitO-7: cylinder address in binary 
BitO-7: head address, must be binary zero 


BitO-7: record address in binary 


Designation 
Condition defined by byte 0 is further 


defined by bits turned on in bytes 1 and 2. 
BitO: command reject 
BitO: invalid command 

1-7: reserved 


Sense Byte 
0 

1 

2 

3 

4& 

5 

3800 - Printer Subsystem 

Sense Byte 
0-2 

0 

1 

2 


BitO-7: reserved 
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3800 - Printer Subsystem (cont....) 
Sense Byte Designation 
0 Bitl: intervention required 
1 BitO: not ready 
1: operation check 
2: toner collector full 
3: toner supply empty 
4: developer replacement required 
5: end of forms 
6: output full 
7: reserved 
2 BitO: forms overlay check 
1: transfer check 
2: fuser check 
3: CFS check 
4: process check 
5: BTS check 
6: reserved 
7: line overrun 
0 Bit2: bus out parity 
1 BitO: command code 
1: data byte 
2-7: reserved 
2 BitO-7: reserved 
0 Bit3: equipment check 
1 BitO: hardware error 
1: permanent error 
2: internal log full 
3: cancel key 
4-7: reserved 
2 BitO-7: reserved 
0 Bit4: data check 
1 BitO: unprintable character 
1: reserved 
2: no translate table 
3: no FCB channel code match 
4: multiple characters 
5-7: reserved 
2 BitO-7: reserved 
0 BitS: reserved 
1 BitO-7: reserved 
2 BitO-7: reserved 
0) Bit6: load check 
1 BitO: incorrect length 
1: incorrect multiple of 6, 8, 12LPI 
2: FCB 1/2-inch error 
3: invalid FCB channel codes 
4: FCB length check 
5: WCGM not loaded 
6: unassigned graphic character 
7: reserved 
2 BitO: invalid WCGM ID 
1: no ID for WCGM 00 
2: invalid copy modification 
3: invalid forms overlay sequence 
4: invalid graphic modification 
5: WCGM data parity error 
6-7: reserved 
0 Bit7: channel 9 
1 BitO-7: reserved 
2 BitO-7: reserved 
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3881 - Optical Mark Reader 


Sense Byte 
6) 


Designation 


Bito: 
i: 
2: 
33 


command reject 
intervention required 
bus-out check 
equipment check 


4-52 -- 


6: 
7; 


unusual command sequence 


3886 - Optical Character Reader 
Designation 


Sense Byte 
6) 


4245 - Printer 
Sense Byte 
0 


BitO: command reject 
1: intervention required 
2: bus-out check 
3: equipment check 
4-5: -- 
6: non-initialized 
7: RCP error 

BitO: -- 
1: mark check 
2: invalid format 
SoS 
4: incomplete scan 
5: -- 
6; non-recovery 
7: outboard 


Designation 


Bito: 


NS DOUFWN FH 


command reject 
intervention required 
bus-out check 
equipment check 

data check 

buffer parity check 
load FCB check 
channel 9 


BitO-2: not used 


line position check 
forms check 

command suppress 
controller check 


: not used 


carriage fail to move 
carriage motion check 


2-4: not used 


5: 
6: 
73 


forms jam 
not used 
band velocity check 


BitO-2: not used 


SOW & & 


coil protect 
hammer fire check 
not used 

sync check 

ribbon check 


Always X'84' 
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4248 - Printer 


Sense Byte Designation 
0) Bit0O: command reject 


1: intervention required 
: bus-out check 
equipment check 

data check 

: buffer parity check 
load check 

channel 9 


ww 1 Action code 


Hex 00: no error exists 

O01: data or program check 

92: intervention required 

93: normal intervention 

o4. channel check 

“as. error logging crippled 

06: microcode error, recoverable 

07: microcode error, unrecoverable 
j : OA: channel 9 detected 
—w OB: retries exceeded threshold 


10: unrecoverable error in rotate mode 


NOW SW PD 


2 Unit Code Area 
Hex 00: not defined 
Ol: power 
02: IPL task 
03: level O handler & microcode hardw. 
04: 804B display unit 
05: not defined 
06: printer adapter & CAC 
07: printer adapter & CAC 
08: PCA & CAC 
09: channel task 
OA: buffer sync task (print task) 
OB: not defined 
OC: not defined 
OD: SLIM file & CAC 
OE: internal u-code 
OF: printer maintenance task 


3 Error Code 


5424/5425 - Multifunction Card Unit 


Sense Byte Designation 
0 BitO: command reject 


1: intervention required 
2: bus-out check 
3: equipment check 
4; data check 
5 . 
6 
7 


no card available 


1 BitO: read check 

1: punch check 
Ly NaS 
3: print data check 

i 4: print clutch check 
5: hopper check 
6: feed check 
7 
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5424/5425 - Multifunction Card Unit (cont....) ( 


Sense Byte Designation 
2 Bit0: -- : 
les 
2: card in primary wait station 
3: card in secondary wait station 
4: NPRO allowed 
5: hopper cycle not complete 
6: card in transport counter bit 2 
7: card in transport counter bit 1 : 
3 Contains a hexadecimal number whose value can f 
represent feedchecks and emitter checks in the 5425 ‘, 
4 Defines the card column group and tier where the 
error was detected which caused the first read 
check or punch check of a card cycle 
BitO: multiple error 
1-2: B'0O' tier 1 
B'O1' tier 2 
B'10' tier 3 e 
3-7: B'00000' column group 1 [ 
B'00001' column group 2 \ 


trttt ee! 


rrtrt 


B'11111' column group 32 


row miscompare 
row miscompare 
row miscompare 
row miscompare 
row miscompare 
row miscompare 
row miscompare 
row miscompare 


ENP OPW aD 


6-10 : Forms a table of the five most 
recent command strings 
BitO: secondary 


1: print four lines 
2: stacker select M2 
3: stacker select M3 
4: punch : 
5: feed command sample 
6: print 
7: read 
8809 - Tape Unit 
Sense Byte Designation 
0 BitO: command reject 


1: intervention required 
2. ani as 

3: equipment check 
4: data check 
5: overrun 
6-7: <- 


1 BitO: noise 
: tape unit status A 
: tape unit status B f 


: write status 
file protected 


1 

2 

3: 

4: at loadpoint \ 
é : 
6 

7: not capable 


2 TR, 
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an 8809 - Tape Unit (cont....) 

ff Sense Byte Designation 

2 BitO-7: represent track-in-error pointers 
3 BitO: 128 ERP number 


DOC - 


1 64 ERP number 
2 32 ERP number 
3: 16 ERP number 
4: 8 ERP number 
Ss 4& ERP number 
6 2 ERP number 
7 1 ERP number 


4 BitO: -- 
Les 
2: tape indicate 
3: permanent error 

4: host detected error 

5: loop write to read error 

6-7: not used 


5 BitO-2: -- 
3: PE ID burst check 
4-7: -- 

6 Contains all zeroes 

7 BitO: 8 format code 


1: 4 format code 

2: 2 format code 

3: 1 format code 

4: data security erase 
5-7: -- 


8-31 Sense bytes 8-31 are only used 
for hardware diagnostics 


Display Operator Console 


Sense Byte Designation 
0 BitO: command reject 
1: intervention required 
23 --= 
3: equipment check 
4: -- 
Be ear 
6: -- 
7: operation check 


TP - Teleprocessing Devices 


Sense Byte Designation 
0 BitO: command reject 


intervention required 
bus out check 
equipment check 

data check 

overrun 

lost data 

timeout 


NDUP WN eH 
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I T T T T a2 
| BYTE o | BYTE 1 | BYTE 2 [| BYTE 3. | EXPLANATION | 
| ais | ! 4 | 
| MCH/CCH Hard Wait Code placed in low address storage | 
+-— T T | ae ae aa aaa | 
| x'ci' | x'oo' | A,I,s | Not used | Irrecoverable machine check. | 
| x'c2' | x'too' | A,I,s | Not used | Irrecoverable channel check | 
| we Ai | | | during fetch. | 
{| x'c3' | x'oo' | A,I,s | Not used | Irrecoverable channel check | 
| | | | | on paging channel. | 
| x'c5' | x'oo' | A,I,s | Not used | No ECSW stored. | 
| x'c7' | xtoo' | A,I,s | Not used | Channel failure; channel | 
| | | | | address invalid. | 
| x'cs' | xtoo' | A,I,s | Not used | Channel failure on SYSLOG. | 
oar acheter 2 ————1 
Notes: | 

A c'c1' — SYSREC recording unsuccessful (NO record written) | 

I c'c9' — SYSREC recording incomplete (Not all records written) | 

S C'E2' — SYSREC recording successfully completed | 

sal 


IPL Hard Wait Codes 


| 

[aoa ee a a 7 
x'o7' | X'E6' | Channel | Unit or | IPL input/output error: | 

| | | x'oo' | I/O error on SYSRES | 

| | | | I/O error on communication| 

| | | | | device | 
| | | | | Equipment malfunction | 
| | | | | during STORE-CHANNEL-ID | 
| x'c1i* | X'E2' | not used | not used | Irrecoverable machine check | 
| Xtec' | X'oo' | X'OF' | x'Do' | Error during IPL. IPL | 
| | | - | canceled (cc = cancel code) | 
| x'Fo' | x'c9' | x'Fo' | X'Fo' | see message 0100 | 
| X'Fo' | x'c9' | X'Fo' | X'F2' | Requested Supervisor cannot | 
| | | be loaded (see message 0103) | 
| x'Fo' | x'c9' | X'Fo' | X'F6' | Device type of SYSRES cannot | 
| | | | | be identified. The volume | 
| | | | | label (VOL1) or format—4 | 
| | | | | record contains invalid in- | 
| | | | | formation. The pack was not | 
| | | | | initialized correctly. | 
| x'Fo' | x'c9' | X'Fo' | X'F7' | see message 0107 | 
| x'Fo' | x'c9' | x'Fo' | X'F8' | see message 0108 | 
| x'Fo' | x'c4' | X'F3' | X'F8' | see message 0D38 | 
| x'Fo' | x'p1' | x'Fs' | X'Fo' | Unsopported SYSLOG device | 
| | | | | see message 0J50 | 
/—____l—— t ee aah | 
| Device Error Recovery Wait Codes. Refer to OP... messages | 
s | 

| x'o8' | X'c1’ | Channel | Unit | | 
| to. | or | | | Error recovery message | 
| xteo’ | x'c4' | | 


| SDAID Soft Wait Codes (identified by EEEE in addr. part of WAIT PSW. | 


SS ee “ak a 


| x'e2' | x'c5' | not used | not used | SDAID output device unready. | 
| | | | | Make printer ready and press| 
| | | | | EXTERNAL INTERRUPT key. 

| xtoo' | x'oo' | x'oo' | x'oo' | SDAID stop on event. To con-| 
| | | | | tinue press EXT. INTERRUPT. | 
| CSeaeec amen mer Oes (eee 1 on sf 
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HARD AND SOFT WAIT CODES (cont....) 


a eee hl 


~T 


| BYTE 0 | BYTE 1 | BYTE 2 | 


| 


= 
BYTE 3 | EXPLANATION 


Pd 


| 
| 


| : 
| General Hard Wait Codes 
7 
|} x'too' | x'oo' | 
| | | 
| x'oo' | x'oo’ | 
| | | 
| | | 
| | | 
| x'oo' | x'oo! 

| | | 
| x'too' | x'oo' | 
| x'oo' | x'oo' | 
| x'oo' | x'oo' | 
| | | 
| | | 
| x'oo' | x'oo' | 
{| x'oo' | x'oo' | 
{ x'oo' | x'too' | 
| | | 
| x'oo' | x'oo' | 
| xtoo' | xtoo' | 
| x'oo' | x'too' | 
| | | 
{| x'oo' | x'oo' | 
| | | 


x'oc' 


X'OF' 


T 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 
| 


No recovery possible from | 
CRT errors. 

System error condition (e.g. | 
control block inconsistency) | 
GReg 5 contains the address of | 
the location where the system | 
inconsistency was determined. | 
System error detected by the | 
page manager. | 
Unused | 
Unused | 
SSA transient not found | 
(the transient name can be found| 
in ERBLOC). | 
TFIX count outside limits. | 
I/O error during SLD update. | 
No copy blocks available for | 
BTAM appendage I/O request. | 
CRT phase not found. | 
Paging I/O error. | 
Translation specification t 
exception. 

Page fault in Supervisor routine| 
with identifier RID=X'00'. | 


ERROR BYTES AND INFORMATION IN LOW REAL STORAGE 
(in variation to permanent main storage assignment 
- see System/370 Reference Summary) 


| Storage Loc. 


| 
= 
Hex Dec | 
fe 
0-3 0-3 Hard Wait Message Code (MCH,CCH,IPL) 
| o-4 | 0-4 
SYSLOG device is also in error. 
10 — 13 16 — 19 
| 
14 - 17 20 — 23 


80 — 83 128-131 
84 — 85 132=133 
144-147 
94 — 95 148-149 
9C - 9F 156-159 


Ne) 
fon) 
| 
Ne) 
wo 


Device error message codes if I/O error and 


| 
| 
| In a System with ACF/VTAM, the address of the 

| VTAM communications vector table (ATCVT) 

| Address of Communication Region for active 

| partition (COMREG) 

| Address of System Communication Region (SYSCOM) 
| External interrupt information 

| Address which caused a page fault 

| Monitor class number 

| Monitor call address field 
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Are 
f 
ASCII to EBCDIC Correspondance 0/0 to 3/9 ML 
ey a ee ee ee le a we 
| ASCII | EBCDIC | | 
r t aera, 
iCharact.|Col Row|Bit Pattern|Col Row|Bit Pattern| Comments | 
| | | (Hex) | | | 
| NUL | 0 0 | 0000 0000 | 0 0 | 0000 9000 | | 
| SOH | 0 2 {| 0000 0001 | 0 1 | 0000 0001 | | 
| STXx | 0 2 {| 0000 0010 | 0 2 | 0000 o010 | | & 
| ETX | 0 3 | 0000 0011 | 0 3 | 0000 0011 | | fi 
| EOT | 0 4 | 0000 0100 | 3 7 { 0011 0111 | | y 
| ENQ {| 0 5 {| 0000 0101 | 2 D | 0010 1101 | 
| ACK | © 6 | 0000 0110 | 2. E [ 0010 1110 | 
| BEL | 0 7 | 0000 0111 | 2. F | 0010 1111 | 
| BS | 0 8 | 0000 1000 | 1 6 | 0001 O110 | | 
| HT | 0 9 | 0000 1001 | O 5 | 0000 0101 | | 
| LF {| 0 10 {| 0000'1010 | 2. 5 | 0010 0101 | | 
{ VT {| O 11 | 0000 1011 | 0 B { o000 1011 | | 
| FF | 0 12 | 0000 1100 | 0 Cc | 0000 1100 | | ii 
| CR | 0 13 | 0000 1101 | 0 D | oo00 1101 | | if 
| so | 0 14 | 0000 1110 | 0 E | 0000 1110 | | \ 
| SI | 0 15 | 0000 1111 | 0 F | 0000 1111 | | i 
| DLE | 1 ©O | 0001 0000 | 1 0 | 0001 0000 | | 
| DC1 | 2 2 { 0001 0001 | 1 1 | 0001 0001 | | 
| Dc2 {| 2 2 {| 0001 0010 | 1 2 | 0001 0010 | | 
| DC3 { 1 3 {| 0001 0011 | 1 3 | 0001 0011 | | 
| DC4 | 1 4 [| 0001 0100 | 3. C | 0011 1100 | | 
| NAK | 1 5 { 0001 0101 | 3. D | 0011 1101 | 
| SYN | 1 6 | 0001 0110 | 3. 2 | 0011 0010 | 
| ETB | 1 7 | 0001 0111 | 2 6 | 0010 0110 | | 
| CAN | 2 8 | 0001 1000 | 1 8 | 0001 1000 | | 
| EM {| 1 9 {| 0001 1001 {| 1 9 | 0001 1001 | j 
| SUB {| 1 10 | 0001 1010 | 3 F | 0011 1111 | 
| ESC | 2 11 | 0001 1011 | 2 7 | 0010 0111 | | 
| Fs | 2 12 | 0001 1100 | 1 Cc | 0001 1100 | | 
| Gs | 1 13 | 0001 1101 | 1 D | 0001 1101 | | 
| RS |} 1 14 | 0001 1110 | 1 E | 0001 1110 | 
| US } 2 15 | 0001 1111 { 1 F | 0001 1111 | | 
| SP | 2. 0 | 0010 0000 | 4 oO | 0100 0000 | | 
| | | 2 4 | 0010 0001 | 4 F | 0100 1111 | Logical OR | 
pon | 2 2 | 0010 0010 | 7 F | 0111 1111 | | 
| # {| 2 3 | 0010 0011 | 7 B | 0111 1011 | | 
| s | 2 4 | 0010 0100 | 5 B | 0101 1011 | | 
| 2 5 | 0010 0101 | 6 Cc | 0116 1100 | | 
| & 2 6 {| 0010 0110 | 5 0 | 0101 0000 | | 
dont | 2 7 | 0010 0111 | 7 D | 0111 1101 | | 
| ¢ | 2 8 | 0010 1000 | 4 D | 0100 1101 | | 
| ) |} 2 9 | 0010 1001 | 5 D { 0101 1101 | | 
| * | 2 10 | 0010 1010 | 5 Cc | 0101 1100 | | z 
| + 2 11 | 0010 1011 | 4 E | 0100 1110 | | a 
\, 33 | 2 12 | 0010 1100 | 6 B {| 0110 1011 | | 
_ 2 13 | 0010 1101 | 6 0 | 0110 0000 | Hyphen, Minus | 
tay | 2 14 | 0010 1110 | 4 B | 0100 1011 | | 
1 / | 2 15 | 0010 1111 | 6 1 | 0110 0001 | 
| 0 {| 3 oO | 0011 0000 | FO [ 1111 0000 | | 
{ 1 3 1 | 0011 0001 | F 1 | 1111 0001 | 
| 2 3 2 | 0011 0010 | F 2 | 1111 0010 | 
| 3 | 3 3 | 0011 0011 | F 3 | 1111 0011 | f 
| 4 | 3 4 | 0011 0100 | F 4 | 1111 0100 | ie 
| 5 | 3 5 | 0011 0101 | F 5 | 1111 0101 | | a 
| 6 3 6 | 0011 0110 | F 6 { 1111 0110 | | : 
| 7 3 7 { 0011 0111 | F 7 | 1111 0111 | 
| 8 3 8 | 0011 1000 | F~ 8 | 1111 1000 | 
| 9 3 9 | 0011 1001 | F 9 | 1111 1001 | 
a fe. | eine i ite 
f 


4s 
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ASCII to EBCDIC Correspondance 3/10 to 7/8 


r 


ASCII 


= 
|Charact.|Col Row|/Bit Pattern|Col Ro 
| 


T 


E 


BCDIC 


w[{Bit Pattern| Comments | 


. 
| 
| 


| | | (Hex) | | 
- +———| ee 
|: | 3 10 | 0011 1010 | 7 A | 0111 1010 | | 
I; | 3 11 | 0011 1011 {| 5 E | 0101 1110 | | 
| < | 3 12 | 0011 1100 | 4 Cc | 0100 1100 | 
| = | 3. 13 | 0011 1101 | 7 +E | 0111 1110 | 
es | 3 14 | 0011 1110 | 6 E | 0110 1110 | 
| [ { 3 15 | 0011 1111 | 6 F | 0110 1111 
@ 14 0 | 0100 0000 | 7 C |} 0111 1100 | 
| A 4 1 | 0100 0001 | ¢ 1 | 1100 0001 
B | 4 2 | 0100 0010 | ¢ 2 | 1100 0010 
(AG 4 3 | 0100 0011 | ¢ 3 | 1100 0011 
D | 4 4 | 0100 0100 | c 4 | 1100 0100 | 
E 4  § | 0100 0101 | Cc 5 | 1100 0101 
F | 4 6 | 0100 0110 | ¢ 6 | 1100 0110 
G 4 7 | 0100 0111 | G 7 | 1100 0111 
H 14 8 | 0100 1000 | ¢c 8 ! 1100 1000 
I 4 9 | 0100 1001 | C 9 {| 1100 1001 | 
J | 4 10 | 0100 1010 | D 1 | 1101 0001 | 
K 4 11 | 0100 1011 | D 2 | 1101 0010 
| L 4 12 | 0100 1100 | D 3 } 1101 0011 
M 4 13 | 0100 1101 | D 4 } 1101 0100 | 
N 4 14 | 0100 1110 | D 5 | 1101 0101 
) 4 15 | 0100 1111 | D 6 | 1101 0110 | 
P 5 0 | 0101 0000 | D 7 | 1101 0111 | 
| Q 5 1 | 0101 0001 | D-~ 8 | 1101 1000 | 
R 5 2 {| 0101 0010 | D 9 {| 1101 1001 | 
Ss | 5 3 | 0101 0011 | E 2 {| 1110 0010 } 
T 5 4 | 0101 0100 | E 3 | 1110 0011 
i U 5 § | 0101 0101 | EF 4 } 1110 0100 
Vv | § 6 | 0101 0110 | E 5 | 1110 0101 
W 5 7 | 0101 0111 | E 6 | 1110 0110 | 
X 5 8 | 0101 1000 | E 7 | 1110 0111 
Y 5 9 | 0101 1001 | E~ 8 | 1110 1000 } 
Z 5 10 | 0101 1010 ! E 9 1110 1001 
[ 5 11 | 0101 1011 | 4 A | 0100 1010 
\ 5 12 | 0101 1100 | E oO | 1110 0000 ; Reverse Slant 
] 5 13 | 0101 1101 | 5 A | 0101 1010 
> 5 14 | 0101 1110 | 5 F | 0101 1111 Logical NOT 
—_ / 5 15 {| 0101 1111 | 6 D { 0110 1101 Underscore 
_ 1 6 0 | 0110 0000 | 7 9 {| O111 1001 | Grave Accent 
| a | 6 2 | 0110 0001 | 8 1 | 1000 0001 
b | 6 2 | 0110 0010 | 8 2 | 1000 0010 
c 6 3 | 0110 0011 | 8 3 | 1000 0011 | 
d 6 4 | 0110 0100 | 8 4 | 1000 0100 
le 6 5 | 0110 0101 | 8 5 { 1000 0101 | | 
f£ 6 6 | 0110 0110 | 8 6 | rO00 0110 
g 6 7 { 0110 0111 ; 8 7 | 1000 0111 
h | 6 8 | 0110 1000 | 8 8 | 1000 1000 
| i 6 9 { 0110 1001 | 8 9 | 1000 1001 
| j 6 16 | 0110 1010 | 9 1} 1001 0001 
k 6 11 { 0110 1011 | 9 2 | 1001 0010 
{ial | 6 12 | 0110 1100 | 9 3 | 1001 0011 
| m 6 13 { 0110 1101 | 9 4 | 1001 0100 
ion | 6 14 | 0110 1110 | 9 5 | 1001 0101 
° ( 6 15 | 0110 1111 | 9 6 | 1001 0110 
| p i 7 O {| 0111 0000 | 9 7 | 1001 0111 
i q | 7 1 | 0111 0001 | 9 8 | 1001 1000 
‘x | 7 2 { 0111 0010 | 9 9 | 1001 1001 
s 7 3 | 0111 0011 |! A 2 } 1010 O010 
foot - 7? 4! 0111 0100 ' A 3} 1016 0011 
u . 7  § ! O111 0101 , A 4 } 1010 0100 
Voy , 7 6, 0111 0110 , A 5 ! 1010 0101 
iw ; 7 7 ; O144 0111 ' A 6 | 1010 0110 | 
1 x ; 7 8 | O1i1 i006 . A 7 } 1010 O111 
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[ T —T 
| ASCII | EBCDIC | | 
T T t T t— | 
|Charact.|Col Row!/Bit Pattern|Col Row|Bit Pattern] Comments 
| | | (Hex) | | 
t aeeelk — 
ly | 7 2 | 0111 1001 | A 8 | 1010 1000 | 
| z | 7 16 | 0111 1010 | A 9 | 1010 1001 | 
| } ee a | 0111 1011 | C oO | 1100 oD0d0 | 
| | {| 7 12 | 0111 1100 | 6 A { 0110 1010 | Vertical Line | 
| { {| 7 13 | 0111 1101 | D oO | 1101 1101 | | 
fre | 7 14 | 0111 1110 | A 2 | 1010 1010 | Tilde 
| DEL | 7 15 | 0111 1111 | 0 7 [| 90 0000 0111 | | 
a e peer me | 
EBCDIC to ASCII Correspondance 0/0 to 5/D 
f Te T 7) 
| EBCDIC | ASCII | | 
| 1 - t T fmm | 
|Charact.|Col Row|Bit Pattern|Col Row|Bit Pattern! Comments | 
| | (Hex) | | | | | 
I : t 
| NUL | 0 0 | 0000 0000 | O- O | 0000 CODD | 
| SOH {| © 1 | 0000 0001 | 0 1 | 0000 0001 | | 
| STX | © 2 | 0000 0010 | 0 2 | 0000 O010 | 
| ETX { 0 3 | 0000 0011 | 0 3 | 0000 0011 | | 
| HT {| © 5 | 0000 0101 | 0 9 | 0000 100¥ | | 
| DEL { O 7 { 0000 0111 | 7 15 | O111 1111 | 
| VT | Oo B | 0000 1011 | O 11 | 0000 1011 | 
FF | 0 C | 0000 1100 | 0 12 | 0000 1100 | 
CR | 0 D | 0000 1101 | 0 13 | 0000 1101 | 
| so {| © E | 0000 1110 | O 14 } 0000 1110 | 
SI ; © F | 0000 1111 | 0 15 | 0000 1111 
DLE { 1 © | 0001 0000 | 1 + O | 0001 OD00 | 
| DC1 | 1 1 | 0001 0001 | 1 1 | 0001 0001 | 
DC2 1 2 {| 0001 0010 | 1 2 { 0001 OO10 | 
DG3 1 3 | 0001 0011 | 1 3 | 0001 0011 
BS 1 6 | 0001 0110 | 0 8 | 0000 1000 | 
CAN 1 1 8 | 0001 1000 | 1 8 | 0001 1000 | 
EM | 1 9 | 0001 1001 | 1 9 | 0001 1001 | 
FS 1  C {| 0001 1100 | 1 12 | 0001 1100 | 
GS 1 D {| 0001 1101 | 1 13 | 0001 1101 } 
| RS 1  E j 0001 1110 | 1 14 | 0001 1110 | 
| US 1  F {| 0001 1111 {| 1 15 | 0001 1111 | 
LF |; 2 5 {| 0010 0101 | 0 10 | 0000 1010 | | 
ETB 2 6 { 0010 0110 | 1 7 | 0001 0111 | | 
| ESC | 2 7 {| 0010 0111 | 1 11 | 0001 1011 | | 
ENQ 2 D {0010 1101 | 0 5 { 0000 0101 | | 
| ACK | 2 E | 0010 1110 | 0 6 | 0000 0110 | | 
| BEL { 2 F } 0010 1111 | 0 7 | 0000 0111 | 
SYN | 3 2 | 0011 0010 | 1 6 | 0001 O110 | | 
EOT 3 7 | 0011 0111 | 0 4 | 0000 0100 | | 
DC4 3 C€ {| 0011 1100 | 1 4 | 0001 0100 | 
NAK 3 D | 0011 1101 | 1 5S | 0001 0101 | | 
SUB 3 F | 0011 1111 {| 1 10 | 0001 1010 | | 
SP 4 0 | 0100 0000 | 2. 0O | 0010 0000 | 
[ | 4 Aj 0100 1010 | 5 11 | 0101 1011 | | 
: 4  B | 0100 1011 | 2 14 | 0010 1110 | 
< | 4 c | 0100 1100 | 3 12 | 0011 1100 | 
( 4 Dp | 0100 1101 | 2. 8 | 0010 1000 | | 
+ 4 Ei 0100 1110 | 2 11 | 0010 1011 | | 
| | 4 F } 0100 1111 | 2 1 | 0010 0001 | Logical OR | 
& 1 5 © 1 0101 0000 | 2 6 | 0010 0110 ! | 
] 5 A! 0101 1010 | 5 13 | 0101 1101 j 
s 5 BI 0101 1011 | 2 4 | 0010 0100 : 
* 5  € 1 0101 1100 | 2 10 ! 0010 1010 | 
>) ' 5 D! 0101 1101 | 2 9 {| 0010 1001 | | 
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EBCDIC to ASCIT Correspondance 5/E to D/9 


cr 7 ae ES | 
EBCDIC | ASCII | | 
- — ————- + oa 
|Charact.|{Col Row|Bit Pattern|Col Row|Bit Pattern| Comments | 
| (Hex) | | | | | 
|} 1. —| REPELS — 
|; 5  E {| 0101 1110 | 3 11 } 0011 1011 | | 
5 | 5 F | 01021 1111 | 5 14 { 0101 1110 | Logical NOT | 
| - 6 0 | 0110 0000 | 2 13 | 0010 1101 | Hyphen, Minus | 
/ 6 1 |} 0110 0001 | 2 15 | 0010 1121 | | 
| | | 6 A | 0110 1010 | 7 12 | 0111 1100 | Vertical Line 
hy 6 B | 0110 1011 | 2 12 | 0010 1100 | 
] 6 C {| 0110 1100 {| 2. 5 | 0010 0101 | | 
fic | 6 D | 0110 1101 | 5 15 | 0101 1111 | Underscore 
| > 6 E | 0110 1110 | 3 14 {| 0011 1110 | 
[ 6 F { 0110 1111 | 3 15 | 0011 1111 | | 
J A | 7 9 | 0111 1001 {| 6 O | 0110 0000 | Grave Accent | 
bias 7 A {0111 1010 | 3 10 | 0011 1010 | 
# | 7 B {| 0111 1011 | 2 3 | 0010 0011 | | 
@ | 7 C€ { 0111 1100 | 4 0 | 0100 0000 | | 
| 7 D {0111 1101 | 2 7 | 0010 0111 
= 7  E { 0111 1110 | 3 13 | 0011 1101 | | 
jo" | 7 F | 0111 1111 | 2 2 | 0010 oO10 | | 
| a | 8 1 | 1000 0001 | 6 1 {| 0110 0001 | 
b | 8 2 | 1000 0010 | 6 2 | 0110 0010 
c | 8 3 | 1000 0011 | 6 3 | 0110 0011 | 
| a 8 4 | 1000 0100 | 6 4 { 0110 0100 | 
e 8 5 | 1000 0101 | 6 5 { 0110 0101 | 
| £ | 8 6 | 1000 0110 | 6 6 | 0110 0110 | 
| g {| 8 7 | 1000 0111 | 6 7 | 0110 0111 
h 8 8 | 1000 1000 | 6 8 | 0110 1000 
i | 8 9 | 1000 1001 | 6 9 | 0110 1001 
| j 9 1 | 1001 0001 | 6 10 | 0110 1010 
k 9 2 { 1001 0010 | 6 11 | 6110 1011 | 
1 { 9 3 | 1001 0011 | 6 12 | 0110 1100 | | 
| im 9 4 | 1001 0100 | 6 13 { 0110 1101 
n | 9 5 | 1001 0101 | 6 14 | 0110 1110 | 
° |} 9 6 | 1001 0110 | 6 15 | 0110 1111 | | 
| p 9 7 | 1001 0111 | 7 O { 0111 0000 
q 9 8 } 1001 1000 | 7 1 | 0111 0001 
x ; 9 9 | 1001 1001 | 7 2 | 0111 0010 | 
ys? A 1 | 1010 1010 | 7 14 | 0111 1110 | Tilde 
ls A 2 { 1010 0010 | 7 3 j 0111 OO11 | 
t | A 3 | 1010 0011 | 7 4 | 0111 0100 | | 
ju | A 4 | 1010 0100 | 7. 5 } 0111 0101 | 
lov | A 5 {| 1010 0101 | 7 6 } O111 O110 | | 
w | A 6 {| 1010 0110 | 7 7 } 0111 0111 | 
| x A 7 | 1010 0111 | 7 8 { 0111 1000 | 
ly A 8 [{ 1010 1000 | 7. 9 | 0111 1001 
z | A 9 | 1010 1001 | 7 10 | 0121 1010 | 
i { c 0 | 1100 0000 | 7 11 { 0111 1011 | 
1 A Cc 1{ 1100 0001 | 4 1 j 0100 0001 
B j ¢ 2 | 1100 0010 | 4 2 } 0100 0010 | 
ee c 3 | 1100.0011 | 4 3 | 0100 0011 
D Cc 4 { 1100 0100 | 4 4 | 0100 0100 
E 1c 5 | 1100 0101 | 4 5 } 0100 0101 | 
| F Cc 6 | 1100 0110 | 4 6 { 0100 0110 
| G c 7 | 1100 0111 | 4 7 | 0100 0111 
| H | c¢ 8 | 1100 1000 | 4 8 { 0100 1000 | | 
I Cc 9 | 1100 1001 | 4 9 | 0100 1001 
| } D Oj 1101 1101 | 7 #13 | O111 1101 
J D 1 | 1101 0001 | 4 10 ! 0100 1010 | 
K D 2 1 1101 0010 | 4 11 } 0100 1011 | 
tL D 3 ! 1101 0011 | 4 12 | 0100 1100 
1 M D 4 1 1101 0100 i 4 13 } 0100 1101 } 
N 1D 5 | 1101 0101 | 4 14 } 0100 1110 
) 'D 6+: 1101 0110 | 4 15 | 0100 1111 
P D 7 1 1101 0111 | 5 O01} 0101 90000 
190 D 8! 1101 1000! 5 1! 0101 0001 | 
-R 'D 9 ! 1101 1001 i: 5 2 : 010) 9010 § 
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Tc fo Tt aia | 
| EBCDIC | ASCII | | 
= —T i T +— — 
|Charact.|Col Row|Bit Pattern|Col Row|Bit Pattern| Comments | 
| | (Hex) | | | | | 
|-———__+——_ +——— + 
| \ | E Of} 1110 0000 | 5 12 | 0101 1100 | Reverse Slant | 
| § | E 2 {1110 0010 | 5 3 | O10% 0011 | | 
| T | E 3 {| 1110 0011 | 5 4 | 02101 0100 | | 
| U | EF 4 | 1110 0100 {| 5 5 | O101 0101 | | 
|v | E 5 {| 1110 0101 | 5 6 | 0101 6110 | | 
| W | E 6 {1110 0110 | 5 7 | 0101 0111 | 
| xX | E 7 {| 1110 0111 | 5 8 | 0101 1000 | | 
| ¥ | E 8 | 1110 1000 | 5 9% | 0101 1001 f 
| zZ {| E 9 {| 1110 1001 | 5 10 | 0101 1010 | f 
{| 0 | Fo | 1111 0000 | 3. 0 | 0011 0000 | | 
| 1 F 1 | 41111 0001 | 3. 12 | 0011 0001 | | 
| 2 | F 2 { 1111 0010 | 3. 2 { 0011 0010 | 
| 3 F 3 | 1111 0011 | 3 3 | 0011 oot! | | 
| 4 | F 4 | 1111 0100 | 3) 4 | 0011 0100 | 
| 5 | F 5 | 1111 0101 | 3 5 | 0011 O101 | ‘af 
| 6 | F 6 | 1111 0110 | 3. 6 | 0011 0110 | 
17 F 7 | 1111 0111 | 3 7 | 0011 0111 | | 
| 8 | F 8 { 1111 1000 | 3. 8 | 0011 1000 | | 
| 9 F 9 | 1111 1001 | 3 9 | 0011 1001 | | 
ae nes ae a Cees eeeeees LL 4 ot 
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an 


FON 


an 


wo 
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INDEX 


J 
| Special Characters | 
[a = 


/. Label command 2-53 
/+ End-of-DATA statement 2-53 
/* or END libr statement 2-53 


| A | 
LJ 


ABEND Dump Function 5-35 
ACCESS command 2-46 

ACCTABLE 4-119 

ACCTCOMN 4-118 

ACTION statement 2-43 

ADD - IPL command 2-2 

ADD (update) subcommand 2-52 
ADD statement (ESERV) 2-54 
AFFECTS (MSHP) 5-86 

ALLOC command 2-12 

ALTER 5-86 

ALTER command 2-12 

Anchor Table (ANCHTAB) 4-85 
Anchor Table Entry (ATENTRY) 4-85 
ANCHTAB 4-85 

APPLY (MSHP) 5-64 

Apply PTF 1-29 

APS Table Entry 4-126 
ARCHIVE (MSHP) 5-65 

Archive Update 5-61 

ASCII conversion tables D-2 
ASPL macro 3-24 

ASSGN command + statement 2-13 
ASSIGN macro 3-24 

ATENTRY 4-85 

ATTACH macro 3-24 


| B | 
ios 


BACKUP command 2-46 
BACKUP HISTORY (MSHP) 5-66 
Backup PP example 5-58 
BACKUP PRODUCT (MSHP) 5-67 
BATCH command 2-16 


| c | 
ae 


CALL macro 3-24 
Cancel Codes 4-10 
CANCEL command 2-16 
CANCEL macro 3-24 
CATALOG command 2-46 
CBTAB 4-103 

CCB 4-19 

CCB Copy Block 4-42 
CCB macro 3-21 

CCW Copy Block 4-43 
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CCWTCB 4-43 

CDLOAD macro 3-24 

CDMOD macro 3-15 

CDMOD options 3-30 

CHANGE command 2-46 

Channel Control Table (CHNTAB) 4-31 
Channel Queue Table (CHANQ) 4-30 
CHANQ (Channel Queue Table) 4-30 
CHAP macro 3-24 

CHECK macro 3-21 

CHKPT macro 3-24 

CHNTAB (Channel Control Table) 4-31 
CLOSE command + statement 2-17 
CLOSE macro 3-21 

CLOSER macro 3-21 

CNTRL macro 3-21 

COL statement (ESERV) 2-54 

command control block (CCB) 4-19 


Command Summary (Info/Analysis) 5-44, 


5-48 

Common DUMP Library SYSDUMP 5-43 

COMPARE command 2-47 

COMPATIBLE (MSHP) 5-87 

Component Identification 5-55 

COMPRISES (MSHP) 5-87 

COMREG (partition communications 
region} 4-78 

COMREG macro 3-24 

CONNECT command 2-47 

Connection Request Control Block 
(CRCB) 4-99 

Console Buffer Table (CBTAB) 4-103 

Console Commands 1-24 

Control and Work Blocks for CCW 
Fixing 4-36 

COPY (MSHP) 5-67 

COPY command 2-47 

CORRECT (MSHP) 5-68 

Correct a Module 5-60 

Correct a Phase 5-60 

Correct a Source Macro 5-60 

Correct Unedited Source Macro 5-61 

Corrective Service 1-27 

CPCLOSE macro 3-24 

CPCOM macro 3-24 

CRCB (connection request control 
block) 4-99 

CREATE (MSHP) 5-70 

CRT Constant Table (CRITAB) 4-104 

CRT Save Area (CRTSAV) 4-105 

CRTSAV 4-105 

CRTTAB 4-104 


| D | 
sy 


DASD Sharing Dsect (DLFADR) 4-94 
DATA (MSHP) 5-88 
Data Management and System Control 
Macros 3-15 
DATE statement 2-17 
Declarative Macros 

CDMOD 3-15 

DFR 3-15 


Index X-1 
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DIMOD 3-15 DTFCN macro 3-16 
DLINT 3-15 DTIFCP (DISK=NO) 3-56 . 
DRMOD 3-15 DIFCP (DISK=parameter omitted) 3-58 
DTFCD 3-15 DTFCP (DISK=YES - Compiler) 3-53 
DTIFCN 3-16 DTFDA (Direct Access) 3-70 
DIFDA 3-16 DTFDA macro 3-16 
DIFDI 3-16 DTFDI (Device Independent) 3-60 
DTFDR 3-16 DTFDI macro 3-16 
DTFDU 3-17 DTFDR (3886 Optical Reader) 3-48 
DTFIS 3-17 DTFDR macro 3-16 
DIFMR 3-17 DTFDU (Diskette Unit) 3-63 
DTFMT 3-18 DIFDU macro 3-17 
DTFOR 3-18 DTFFIX (variable part of .DTFMT) 3-119 
DTFPH 3-18 DTFIS ADD 3-84 
DTFPR 3-19 DTFIS ADDRTR 3-101 
DTIFSD 3-19 DTFIS LOAD 3-78 
DUMOD 3-19 DTFIS macro 3-17 
ISMOD 3-19 DTFIS RETRVE, RANDOM 3-91 
MRMOD 3-20 DTFIS RETRVE, SEQNTL 3-96 
ORMOD 3-20 DTFMR (MICR) 3-42 
PRMOD 3-20 DTFMR macro 3-17 
DEF - IPL command 2-3 DTFMT Data area (common part) 3-117 
DEFINE (MSHP) 5-88 DTFMT macro 3-18 
DEFINE command 2-48 DTFOR (Optical Reader) 3-46 
Define the Lock (DTLADR) 4-91 DTFOR macro 3-18 
DEL - IPL command 2-3 DTFPH (DAM Files) 3-77 
DEL (update) subcommand 2-52 DTFPH (Diskette) 3-68 
DEL statement (ESERV) 2-55 DTFPH (Sequential Disk) 3-66 
DELETE (MSHP) 5-90 DTFPH macro 3-18 
DELETE command 2-48 DTFPR (Printer) 3-50 
Delimiter Statements 2-11 DIFPR macro 3-19 
DEQ macro 3-24 DTIFSD (Data Files) 3-109 
DETACH macro 3-24 DIFSD (Work Files) 3-115 
DEVCB 4-123 DIFSD macro 3-19 


Device Control Block (DEVCB) 4-123 

Device Type Codes 2-62 

DFR macro 3-15 

DIB 4-95, 4-96 

DIB Extension Table (DIBX) 4-96 

DIBK 4-96 

DIDAL Block 4-47 

DIMOD macro 3-15 

DIMOD options 3-30 

Directory and Index 4-113 

Directory Entry in SDL 4-114 DUMOD macro 3-19 

DISEN macro 3-21 DUMODFx options 3-31 

Disk Information Block (DIB) 4-95, DUMP (MSHP) 5-70 
4-96 DUMP command 2-19 


DTFSPAN (variable part of 

DTFMT) 3-121 

DTFUNDEF (variable part of 

DTFMT) 3-122 

DTFVAR (variable part of DTFMT) 3-120 
DTFWRKF (variable part of 

DTFMT) 3-123 

DTFX (Extension of DTFMT) 3-124 

DTL macro 3-25 

DTLADR 4-91 


ee 
1 


Disk Layout 1-15 

Disk Volume Requirement 1-11 
DLA - IPL command 2-4 

DLBL statement 2-18 

DLF - IPL command 2-4 
DLFADR 4-94 

DLINT macro 3-15 

DOSVSDMP Utility 5-38 
DOSVSDMP Wait Codes 5-41 

DPD - IPL command 2-5 

DPDTAB 4-122 

DRMOD macro 3-15 

DRMOD options 3-31 

DSPCH statement (ESERV) 2-54 
DSPLY command 2-19 

DSPLY macro 3-21 

DSPLY statement (ESERV) 2-54 
DTF Extension for DTFDA 3-76 
DTF Type Code 3-132 

DTFCD (Input - Reader) 3-33 
DTFCD (combined) 3-40 

DTFCD (Output - Punch) 3-37 
DTFCD macro 3-15 

DTFCN (Console) 3-41 
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DUMP 
Dump 
DUMP 
Dump 
Dump 
Dump 
Dumps 


Command Dump 5-36 

Facilities 1-38 

macro 3-25 

Processing 1-37 

Requested by Macros 5-37 

Tape printed with DOSVSDMP 
5-35 


DVCDN command 2-20 
DVCUP command 2-20 


E | 


Ld 


ECB 

END ( 
END s 
END s 


4-72 

update) subcommand 2-52 
tatement 2-59 

tatement (ESERV) 2-55 


ENDFL macro 3-21 

Ending Info/Analysis 5-44 
ENQ macro 3-25 

ENTRY statement 2-43 

EOJ macro 3-25 


Pusat, Si 
ae be 
, 
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ERBLOC Area 4-34, 4-97 
EREP 5-6 

EREP basic functions 5-6 
EREP JCL 5-7 

EREP Job Examples 
EREP Keywords 5-8 
EREP Logical Units 5-8 
EREP output abbreviations 
EREP Parameter Combinations 
EREP reporting functions 5-6 
EREP Reports Invalid Selection 
Parameters 5-11 

EREP Storage Requirements 5-6 

ERET macro 3-21 

ERPIB 4-90 

Error bytes in low real storage 


5-12 


5-13 


5-10 
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Error Recovery Procedure Information 


Block (ERPIB) 4-90 
ESD statement 2-58 


ESERV Control Statements 2-54 
ESETL macro 3-21 

Event Control Block (ECB) 4-72 
EXCLUDE 5-90 

EXCP macro 3-21 

EXEC command + statement 2-20 


EXECUTE (MSHP)} 5-91 

Execution modes (Info/Analysis) 
EXIT macro 3-25 

Extent Information Entry 4-18 
EXTENT statement 2-22 

EXTRACT macro 3-25 


[ao 
ae 


Fast Service Upgrade 
FCEPGOUT macro 3-25 
FEOV macro 3-21 
FEOVD macro 3-21 
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